Metrics for Henrywood and Agarwal, Equation (12)

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze403.0ms (2.2%)

Memory

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

sample6.4s (35.5%)

Memory

7.8MiB live, 7 120.3MiB allocated

Samples

2.9s	13 341×	0	invalid
2.0s	8 256×	0	valid

Precisions

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

ival-div: 1.2s (33.6% of total)

ival-mult: 995.0ms (28.7% of total)

ival-pow: 857.0ms (24.7% of total)

ival-pow2: 263.0ms (7.6% of total)

ival-sub: 140.0ms (4% of total)

exact: 21.0ms (0.6% of total)

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

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

Bogosity

explain357.0ms (2%)

Memory

-7.9MiB live, 803.2MiB allocated

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
67	-	4	(2.560320628696519e-187 5.147976804113733e-82 6.008143011329093e+136 4.354016968214545e-158 5.77270874161379e-175)	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
59	-	3	(1.2764841409675968e-84 1.2349236657823874e+230 4.807899549455432e-90 -7.983724271380093e-24 -2.676313056678086e+241)	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
47	-	0	-	`(.f64 (.f64 (/.f64 #s(literal 1 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	-	2	(3.814862304751718e-194 2.98584936296644e+105 1.5023599487692025e-46 3.0652933612634817e-277 4.3531976025343783e-36)	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`
24	-	0	-	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
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 l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	uflow-rescue	36	0
↳	`(/.f64 d l)`	underflow	36
`pow.f64`	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	32	0
↳	`(/.f64 d h)`	overflow	32
`pow.f64`	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	27	0
↳	`(/.f64 d l)`	overflow	27
`pow.f64`	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	uflow-rescue	24	0
↳	`(/.f64 d h)`	underflow	24
`*.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**	20	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**	13	0
↳	`(/.f64 d h)`	underflow	24
↳	`(/.f64 d l)`	underflow	36
↳	`(*.f64 (pow.f64 (/.f64 d 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	20
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	96
↳	`(.f64 (/.f64 #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	96
↳	`(/.f64 h l)`	overflow	38
↳	`(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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	88
↳	`(.f64 (.f64 (/.f64 #s(literal 1 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	88
↳	`(*.f64 M D)`	overflow	43
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	55
`/.f64`	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	o/n	12	0
↳	`(*.f64 M D)`	overflow	43
`*.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**	8	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))`	*ou**	6	0
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	96
↳	`(.f64 (/.f64 #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	96
↳	`(*.f64 M D)`	overflow	43
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	55
↳	`(/.f64 h l)`	underflow	25
`*.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**	3	0
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	underflow	68
↳	`(.f64 (/.f64 #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	68
↳	`(*.f64 M D)`	underflow	29
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	underflow	31
↳	`(/.f64 h l)`	overflow	38

Confusion

	Predicted +	Predicted -
+	87	2
-	30	137

Precision

0.7435897435897436

Recall

0.9775280898876404

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	87	0	2
-	30	0	137

Precision?

0.7435897435897436

Recall?

0.9775280898876404

Freqs

test

number	freq
0	139
1	69
2	32
3	13
4	3

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

112.0ms

512×

valid

Compiler

Compiled 347 to 70 computations (79.8% saved)

Precisions

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

ival-mult: 23.0ms (32.2% of total)

ival-pow: 20.0ms (28% of total)

ival-div: 19.0ms (26.6% of total)

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

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

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

exact: 1.0ms (1.4% of total)

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

preprocess146.0ms (0.8%)

Memory

6.9MiB live, 200.5MiB allocated

Algorithm

1×	egg-herbie

Rules

6 600×	`lower-*.f32`
6 588×	`lower-*.f64`
3 422×	`lower-/.f32`
3 414×	`lower-/.f64`
2 244×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

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.5MiB live, 0.5MiB 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
▶	66.6%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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

▶

66.6%

(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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)

simplify106.0ms (0.6%)

Memory

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

Rules

6 600×	`lower-*.f32`
6 588×	`lower-*.f64`
3 422×	`lower-/.f32`
3 414×	`lower-/.f64`
2 244×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

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)

localize66.0ms (0.4%)

Memory

-14.7MiB live, 97.8MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	5.855883432575142	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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	11.080654495931022	(.f64 (.f64 (/.f64 #s(literal 1 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	13.61716130691708	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	15.340518888736387	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

50.0ms

256×

valid

Compiler

Compiled 156 to 24 computations (84.6% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

series64.0ms (0.4%)

Memory

24.7MiB live, 104.1MiB 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
7.0ms	M	@	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)))))
6.0ms	d	@	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)))))
5.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	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)))))
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)))))

simplify189.0ms (1.1%)

Memory

-15.1MiB live, 181.0MiB allocated

Algorithm

1×	egg-herbie

Rules

6 712×	`lower-*.f64`
6 712×	`lower-*.f32`
3 114×	`lower-fma.f64`
3 114×	`lower-fma.f32`
2 960×	`lower-/.f32`

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

rewrite162.0ms (0.9%)

Memory

5.3MiB live, 284.3MiB allocated

Rules

7 446×	`lower-*.f32`
7 434×	`lower-*.f64`
4 352×	`lower-fma.f64`
4 352×	`lower-fma.f32`
3 368×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

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>

eval96.0ms (0.5%)

Memory: 14.1MiB live, 167.4MiB allocated
Compiler: Compiled 26 376 to 1 506 computations (94.3% saved)

prune90.0ms (0.5%)

Memory

-25.6MiB live, 114.0MiB allocated

Pruning

33 alts after pruning (33 fresh and 0 done)

	Pruned	Kept	Total
New	651	33	684
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	652	33	685

Accuracy

90.7%

Counts

685 → 33

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	44.1%	(fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	45.2%	(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)))
	27.3%	(fma.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (pow.f64 l #s(literal -1/2 binary64)) (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))))
	66.6%	(/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.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.3%	(/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.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)))
	34.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)))
	42.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 l))) (sqrt.f64 d)) (sqrt.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 (neg.f64 d))) (sqrt.f64 (neg.f64 l)))
	39.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 h))) (sqrt.f64 d)) (sqrt.f64 l))
	58.4%	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h 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)))
	66.9%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.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.1%	(.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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))) (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)))
	68.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)))) (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)))
	66.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M #s(literal 1/2 binary64)) D)) (.f64 (.f64 d (/.f64 #s(literal 2 binary64) M)) (/.f64 d D)))))
	54.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 h l) #s(literal 1/2 binary64)) (.f64 D M)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 d d)) (.f64 D M)))))
▶	69.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 (/.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))))))
	69.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) l) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (pow.f64 h #s(literal -1 binary64))))))
	28.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)))) #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))))
	32.2%	(.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))))
	66.6%	(.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))))
▶	33.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 #s(literal 1 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.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 h))) (sqrt.f64 d)) (pow.f64 l #s(literal -1/2 binary64)))
	33.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 #s(literal 1 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.2%	(.f64 (sqrt.f64 d) (.f64 (pow.f64 h #s(literal -1/2 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)))))
	26.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fma.f64 (.f64 (.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)))
▶	46.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 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	18.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 (.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.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.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))
	19.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 (.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)))))))
	13.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.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))))))
▶	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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) 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 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))

Compiler

Compiled 1 950 to 1 484 computations (23.9% saved)

simplify125.0ms (0.7%)

Memory

-5.9MiB live, 186.8MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
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	0	(.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)))
cost-diff	0	(.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
cost-diff	0	(/.f64 h l)
cost-diff	2368	(fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
cost-diff	0	(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d))
cost-diff	0	(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))
cost-diff	0	(/.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)
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 (.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))
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)))

Rules

8 058×	`lower-*.f32`
8 008×	`lower-*.f64`
3 608×	`lower-fma.f32`
3 604×	`lower-fma.f64`
3 206×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	89	674
0	152	661
1	266	643
2	658	635
3	3254	635
4	7881	635
0	8037	628

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

localize261.0ms (1.5%)

Memory

52.4MiB live, 468.5MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	2.9429141111337973	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
accuracy	2.9981445077432305	(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))
accuracy	5.67075836411618	(.f64 (.f64 (/.f64 #s(literal 1 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.752699324015803	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	2.5581288466625933	(/.f64 (/.f64 d l) h)
accuracy	5.726864448361948	(fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
accuracy	6.024896729004137	(.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
accuracy	10.122452174888984	(sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))
accuracy	4.971054984608718	(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d))
accuracy	6.083181315010456	(sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)))
accuracy	6.621725793948678	(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))
accuracy	7.2679676986815105	(sqrt.f64 (/.f64 h l))
accuracy	0.109375	(/.f64 #s(literal 1 binary64) (*.f64 l h))
accuracy	0.12109375	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
accuracy	8.248142488784135	(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
accuracy	27.15703648380438	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 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	2.3797722438412348	(/.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	2.9429141111337973	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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))))))
accuracy	7.595896100789357	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	7.752699324015803	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

84.0ms	136×	0	invalid
83.0ms	120×	0	valid

Compiler

Compiled 685 to 77 computations (88.8% saved)

Precisions

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

ival-mult: 53.0ms (41.9% of total)

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

ival-pow: 20.0ms (15.8% of total)

ival-sqrt: 9.0ms (7.1% of total)

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

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

ival-add: 2.0ms (1.6% of total)

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

exact: 1.0ms (0.8% of total)

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

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

series213.0ms (1.2%)

Memory

1.7MiB live, 542.0MiB allocated

Counts

26 → 1 056

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 #s(approx (* (* (pow (/ d 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)) (patch #s(approx ( (* (pow (/ d 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)) #<representation binary64>) () ())
#s(alt (/.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) (patch (/.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) #<representation binary64>) () ())
#s(alt (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)) (patch (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)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())
#s(alt (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())
#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())
#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())
#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<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 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<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 d l) h) (patch (/.f64 (/.f64 d l) h) #<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 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<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 #s(approx (* (* (pow (/ d 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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h l))) (taylor 0 h) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) (taylor 0 h) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) (taylor 0 h) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) (taylor 0 h) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<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 (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<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 (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<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 (/ h l)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h l)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h l)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h l)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<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 (/ d (* h l)) (taylor 0 h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 #s(approx (* (* (pow (/ d 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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (taylor inf h) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow h 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow h 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow h 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (fma.f64 (.f64 (.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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<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 (/ 1 (* h l))))) (taylor inf h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 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 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(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)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<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 (/ h l)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h l)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h l)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h l)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<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 (/ d (* h l)) (taylor inf h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(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/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 #s(approx (* (* (pow (/ d 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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* 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 (/.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* 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 (/.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* 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 (/.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (taylor -inf h) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow h 2) (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow h 2) (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow h 2) (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (.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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<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 (/ 1 (* h l))))) (taylor -inf h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 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 (/ 1 (* h l))))) (taylor -inf h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 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 (/ 1 (* h l))))) (taylor -inf h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 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 (/ 1 (* h l))))) (taylor -inf h) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 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 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<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 (/ d (* h l)) (taylor -inf h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf h) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(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/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 #s(approx (* (* (pow (/ d 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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h l))) (taylor 0 M) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) (taylor 0 M) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) (taylor 0 M) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) (taylor 0 M) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 M) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<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 (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<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 #s(approx (* (* (pow (/ d 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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (taylor inf M) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l))))) (taylor inf M) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l))))) (taylor inf M) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l))))) (taylor inf M) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D 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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf M) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -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 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(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)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<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/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<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 #s(approx (* (* (pow (/ d 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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (taylor -inf M) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l))))) (taylor -inf M) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l))))) (taylor -inf M) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l))))) (taylor -inf M) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D 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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf M) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -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 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(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)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<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/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<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 #s(approx (* (* (pow (/ d 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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (taylor 0 l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) (pow l 2)) (taylor 0 l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) (pow l 2)) (taylor 0 l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) (pow l 2)) (taylor 0 l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<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 (/ 1 (* h l))))) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 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 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(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)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<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 (/ h l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<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 (/ d (* h l)) (taylor 0 l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(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 (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 #s(approx (* (* (pow (/ d 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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h l))) (taylor inf l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) (taylor inf l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) (taylor inf l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) (taylor inf l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<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 (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<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 (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<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 (/ h l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow h 3) (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<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 (/ d (* h l)) (taylor inf l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(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 (* (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 #s(approx (* (* (pow (/ d 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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l))) (taylor -inf l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l)))) (taylor -inf l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l)))) (taylor -inf l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l)))) (taylor -inf l) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<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 (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 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 (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 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 (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 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 (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<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 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<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 (/ h l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ h l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ h l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ h l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h l)) (patch (sqrt.f64 (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (patch (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) #<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 (/ d (* h l)) (taylor -inf l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf l) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 #s(approx (* (* (pow (/ d 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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h l))) (taylor 0 D) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) (taylor 0 D) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) (taylor 0 D) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) (taylor 0 D) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 D) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<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 (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<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/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<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 #s(approx (* (* (pow (/ d 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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (taylor inf D) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l))))) (taylor inf D) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l))))) (taylor inf D) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l))))) (taylor inf D) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D 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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf D) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -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 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(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)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<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/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<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 #s(approx (* (* (pow (/ d 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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (taylor -inf D) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l))))) (taylor -inf D) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l))))) (taylor -inf D) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l))))) (taylor -inf D) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D 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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf D) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -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 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(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)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<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/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<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 #s(approx (* (* (pow (/ d 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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (taylor 0 d) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (pow l 3))))) (* (pow d 2) (sqrt (/ h l)))) d) (taylor 0 d) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (pow l 3))))) (* (pow d 2) (sqrt (/ h l)))) d) (taylor 0 d) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (pow l 3))))) (* (pow d 2) (sqrt (/ h l)))) d) (taylor 0 d) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor 0 d) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #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)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<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 (/ d (* h l)) (taylor 0 d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(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/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<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 #s(approx (* (* (pow (/ d 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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h l))) (taylor inf d) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ h l)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3))))))) (taylor inf d) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ h l)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3))))))) (taylor inf d) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ h l)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3))))))) (taylor inf d) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor inf d) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #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 (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<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 (/ d (* h l)) (taylor inf d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(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/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<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 #s(approx (* (* (pow (/ d 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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<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 (.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)) (patch #s(approx ( (* (pow (/ d 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)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (fma.f64 (.f64 (.f64 (.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) (patch (/.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) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ h l))) (taylor -inf d) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ h l))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3)))))))) (taylor -inf d) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ h l))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3)))))))) (taylor -inf d) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ h l))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3)))))))) (taylor -inf d) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (patch (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (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 (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (patch (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2))) (taylor -inf d) (#s(alt (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (patch (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #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 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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)))))) #<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 (/ d (* h l)) (taylor -inf d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf d) (#s(alt (/.f64 (/.f64 d l) h) (patch (/.f64 (/.f64 d l) h) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(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/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())

Calls

15 calls:

Time	Variable		Point	Expression
24.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) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) h) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (* (* (* M M) -1/8) (/ (* D D) d)) (+ (* (/ h l) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d)))) (sqrt (* (/ (/ d l) h) d))) (/ h l) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d))) (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ (sqrt (neg d)) (sqrt (neg h))) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (/ 1 (* l h)) (sqrt (/ h l)) (sqrt (pow (/ h l) 3)) (sqrt (* (/ (/ d l) h) d)) (/ (/ d l) h) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)))
19.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) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) h) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (* (* (* M M) -1/8) (/ (* D D) d)) (+ (* (/ h l) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d)))) (sqrt (* (/ (/ d l) h) d))) (/ h l) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d))) (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ (sqrt (neg d)) (sqrt (neg h))) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (/ 1 (* l h)) (sqrt (/ h l)) (sqrt (pow (/ h l) 3)) (sqrt (* (/ (/ d l) h) d)) (/ (/ d l) h) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)))
17.0ms	M	@	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) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) h) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (* (* (* M M) -1/8) (/ (* D D) d)) (+ (* (/ h l) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d)))) (sqrt (* (/ (/ d l) h) d))) (/ h l) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d))) (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ (sqrt (neg d)) (sqrt (neg h))) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (/ 1 (* l h)) (sqrt (/ h l)) (sqrt (pow (/ h l) 3)) (sqrt (* (/ (/ d l) h) d)) (/ (/ d l) h) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)))
11.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) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) h) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (* (* (* M M) -1/8) (/ (* D D) d)) (+ (* (/ h l) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d)))) (sqrt (* (/ (/ d l) h) d))) (/ h l) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d))) (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ (sqrt (neg d)) (sqrt (neg h))) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (/ 1 (* l h)) (sqrt (/ h l)) (sqrt (pow (/ h l) 3)) (sqrt (* (/ (/ d l) h) d)) (/ (/ d l) h) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)))
10.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) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) h) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (* (* (* M M) -1/8) (/ (* D D) d)) (+ (* (/ h l) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d)))) (sqrt (* (/ (/ d l) h) d))) (/ h l) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d))) (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ (sqrt (neg d)) (sqrt (neg h))) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (* (* (/ 1/2 d) D) M) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (/ 1 (* l h)) (sqrt (/ h l)) (sqrt (pow (/ h l) 3)) (sqrt (* (/ (/ d l) h) d)) (/ (/ d l) h) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)))

simplify220.0ms (1.2%)

Memory

-23.0MiB live, 353.9MiB allocated

Algorithm

1×	egg-herbie

Rules

8 078×	`lower-*.f64`
8 078×	`lower-*.f32`
3 584×	`lower-fma.f64`
3 584×	`lower-fma.f32`
3 280×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	221	17517
1	656	16920
2	2333	16779
3	5288	16552
0	8791	16234

Stop Event

1×	iter limit
1×	node limit

Counts

1 056 → 1 056

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)
(* 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 (/ h l)))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (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)
(/ h l)
(/ h l)
(/ h l)
(/ h l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) 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 (/ (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))))
(/ (+ (* -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 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/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)) 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 (/ (pow h 3) (pow l 3)))))
(* (pow h 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* (pow h 2) (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* (pow h 2) (+ (* -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/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))))))
(/ h l)
(/ h l)
(/ h l)
(/ h l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) 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/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 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/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))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* 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 (* h (+ (* 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 (* h (+ (* 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 (/ (pow h 3) (pow l 3)))))
(* (pow h 2) (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* (pow h 2) (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))
(* (pow h 2) (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 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)))))))))
(/ h l)
(/ h l)
(/ h l)
(/ h l)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h 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) (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 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 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)))
(* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))
(* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))
(* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))
(* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/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)))))
(* 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 (/ h l)))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
1
(+ 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 (* 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)))
(* 1/8 (/ (* (pow 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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)) 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 (/ (pow h 3) (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (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 (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) 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)) 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)))
(* 1/8 (/ (* (pow 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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)) 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 (/ (pow h 3) (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (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 (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) 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)) 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)))
(* 1/8 (/ (* (pow 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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)) 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 (/ (pow h 3) (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* (pow h 3) l)))) (* d (sqrt (* h (pow l 3))))) (pow l 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))
(/ h l)
(/ h l)
(/ h l)
(/ h l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h 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)) 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 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(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)))))
(* 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 (/ h l)))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* 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)))))
(/ h l)
(/ h l)
(/ h l)
(/ h l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) 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)))))
(* 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 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ h l))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(sqrt (/ (pow h 3) (pow l 3)))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (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)))))
(* (* 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 (/ h l)))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ h l))))
(+ (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (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)))))
(/ h l)
(/ h l)
(/ h l)
(/ h l)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) 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 (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))))
(+ (* -1/8 (* (/ (* (pow 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 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(/ 1 (* h l))
(* (sqrt (/ h l)) (pow (sqrt -1) 2))
(* (sqrt (/ h l)) (pow (sqrt -1) 2))
(* (sqrt (/ h l)) (pow (sqrt -1) 2))
(* (sqrt (/ h l)) (pow (sqrt -1) 2))
(* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ (pow h 3) (pow l 3))) (pow (sqrt -1) 2)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/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)))))
(* 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 (/ h l)))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
1
(+ 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 (* 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)))
(* 1/8 (/ (* (pow 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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 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)) d) (sqrt (/ (pow h 3) (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (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 (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) 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)) 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)))
(* 1/8 (/ (* (pow 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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 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)) d) (sqrt (/ (pow h 3) (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ (pow h 3) (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (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 (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) 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)) 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)))
(* 1/8 (/ (* (pow 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/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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))
(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)) 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 (/ (pow h 3) (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (pow l 3))))) (* (pow d 2) (sqrt (/ h l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (pow l 3))))) (* (pow d 2) (sqrt (/ h l)))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ (pow h 3) (pow l 3))))) (* (pow d 2) (sqrt (/ h l)))) d)
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) 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)) 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)
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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))
(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)))))))
(* 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 (/ h l)))
(* d (+ (sqrt (/ h l)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3)))))))
(* d (+ (sqrt (/ h l)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3)))))))
(* d (+ (sqrt (/ h l)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3)))))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
1
(+ 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 (* 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 (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) 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 (* (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)))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(* d (sqrt (/ h l)))
(* -1 (* d (+ (* -1 (sqrt (/ h l))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3))))))))
(* -1 (* d (+ (* -1 (sqrt (/ h l))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3))))))))
(* -1 (* d (+ (* -1 (sqrt (/ h l))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ (pow h 3) (pow l 3))))))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1/8 (/ (* (pow D 2) (pow M 2)) d))
(* -1 (* 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h l)))))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
(* -1/8 (/ (* (pow D 2) (pow M 2)) (pow d 2)))
1
(+ 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 (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 (* d (sqrt (/ 1 (* h l)))))
(* -1 (* d (sqrt (/ 1 (* h l)))))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(/ d (* h l))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))

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

rewrite239.0ms (1.3%)

Memory

16.2MiB live, 373.3MiB allocated

Rules

7 372×	`lower-*.f32`
7 326×	`lower-*.f64`
4 076×	`lower-/.f32`
4 046×	`lower-/.f64`
2 614×	`lower--.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	89	397
0	152	383
1	458	352
2	3211	332
0	11083	326

Stop Event

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

Counts

26 → 979

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)
#s(approx (* (* (pow (/ d 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))
(/.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)
(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))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d))
(fma.f64 (/.f64 h l) (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
(/.f64 h l)
(.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
(.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)))
(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))
(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.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 #s(literal 1 binary64) (*.f64 l h))
(sqrt.f64 (/.f64 h l))
(sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64)))
(sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d))
(/.f64 (/.f64 d l) h)
(.f64 (.f64 (/.f64 #s(literal 1 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 M D) (.f64 #s(literal 2 binary64) d))

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>

eval331.0ms (1.8%)

Memory: 25.3MiB live, 693.0MiB allocated
Compiler: Compiled 79 700 to 4 551 computations (94.3% saved)

prune307.0ms (1.7%)

Memory

-33.4MiB live, 613.2MiB allocated

Pruning

45 alts after pruning (44 fresh and 1 done)

	Pruned	Kept	Total
New	2 450	39	2 489
Fresh	23	5	28
Picked	4	1	5
Done	0	0	0
Total	2 477	45	2 522

Accuracy

94.1%

Counts

2 522 → 45

Alt Table

Click to see full alt table

Status	Accuracy	Program
	44.1%	(fma.f64 (/.f64 h l) (.f64 (.f64 (/.f64 (.f64 M (.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	29.8%	(fma.f64 (/.f64 h l) #s(approx (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	33.1%	(fma.f64 (/.f64 h l) #s(approx (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d))) (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	45.2%	(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)))
	37.9%	(fma.f64 h (/.f64 (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) l) (/.f64 d (sqrt.f64 (.f64 l h))))
	27.4%	(/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h)))
	34.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)))
	39.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 h))) (sqrt.f64 d)) (sqrt.f64 l))
	42.2%	(.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
▶	66.6%	(.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	66.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 d) h) (.f64 #s(literal 1/4 binary64) D)))))
	36.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/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))))))
	32.2%	(.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))))
	36.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (pow.f64 (neg.f64 l) #s(literal -1 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))))))
	35.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)))) (fma.f64 (.f64 (/.f64 (.f64 (neg.f64 M) (.f64 (/.f64 #s(literal 1/2 binary64) d) D)) l) (.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D))) h #s(literal 1 binary64)))
	34.4%	(.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 #s(literal 1/4 binary64) D) (.f64 (.f64 (/.f64 M d) h) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l)))))
	13.5%	(.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)))) #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))))
	36.0%	(.f64 (.f64 (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (pow.f64 (pow.f64 (neg.f64 d) #s(literal -1/2 binary64)) #s(literal -1 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))))))
	18.5%	#s(approx (+ (* (/ h l) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d)))) (sqrt (* (/ (/ d l) h) d))) (/.f64 (fma.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d (.f64 (sqrt.f64 (.f64 l h)) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)))) (*.f64 l l)))
	19.7%	#s(approx (+ (* (/ h l) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d)))) (sqrt (* (/ (/ d l) h) d))) (.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)))))))
	23.1%	#s(approx (+ (* (/ h l) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d)))) (sqrt (* (/ (/ d l) h) d))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	60.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) d) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	55.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)) (/.f64 (/.f64 h l) (sqrt.f64 (/.f64 l h))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	55.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (.f64 (/.f64 h l) (sqrt.f64 (/.f64 h l))) (.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	49.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 (fma.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) D) (/.f64 D d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	53.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 (fma.f64 M (.f64 (.f64 #s(literal -1/8 binary64) M) (.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 D D) d))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)))
▶	14.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 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
	15.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
	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)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	17.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h))
▶	27.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))))
	26.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 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1/4 binary64)) #s(literal 2 binary64)) d))
	24.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (pow.f64 h #s(literal -1/2 binary64)) (sqrt.f64 l)) d))
	26.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 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
▶	19.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 (.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)))))))
	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 (sqrt.f64 (pow.f64 (.f64 (.f64 l h) (.f64 l h)) #s(literal -1/2 binary64))) 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 (sqrt.f64 (/.f64 (pow.f64 l #s(literal -1 binary64)) h)) d))
	33.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))))
✓	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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
	13.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 d (sqrt.f64 (*.f64 l h))) (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 (sqrt.f64 d))))
	60.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 (neg.f64 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) d) (.f64 (sqrt.f64 (/.f64 h l)) d))) (/.f64 #s(literal -1 binary64) h)))
▶	25.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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d))
	28.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	37.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))

Compiler

Compiled 2 021 to 1 659 computations (17.9% saved)

simplify124.0ms (0.7%)

Memory

2.8MiB live, 192.2MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))
cost-diff	0	(.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d))
cost-diff	6656	(exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)))
cost-diff	0	(*.f64 M M)
cost-diff	0	(.f64 (.f64 M M) #s(literal -1/8 binary64))
cost-diff	0	(.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))))))
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 (.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)))))))
cost-diff	0	(*.f64 (/.f64 (neg.f64 d) l) d)
cost-diff	0	(sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d))
cost-diff	0	(/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 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 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
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 h l) #s(literal -1/2 binary64))
cost-diff	0	(.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
cost-diff	0	(.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
cost-diff	320	(fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64))

Rules

7 194×	`lower-*.f32`
7 166×	`lower-*.f64`
3 950×	`lower-/.f32`
3 932×	`lower-/.f64`
2 108×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	67	436
0	104	422
1	182	419
2	427	419
3	1977	419
4	4215	419
5	7839	419
0	8036	412

Stop Event

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

Calls

Call 1

Inputs
(.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 (/.f64 h l) #s(literal -1/2 binary64))
(/.f64 h l)
h
l
#s(literal -1/2 binary64)
(.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))
#s(literal 1/4 binary64)
(pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64))
(*.f64 D (/.f64 M d))
D
(/.f64 M d)
M
d
#s(literal 2 binary64)
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(sqrt.f64 (/.f64 d h))
(/.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 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 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
(/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))
(sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d))
(*.f64 (/.f64 (neg.f64 d) l) d)
(/.f64 (neg.f64 d) l)
(neg.f64 d)
d
l
(sqrt.f64 (neg.f64 h))
(neg.f64 h)
h
#s(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)))))))
(.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 (.f64 M M) #s(literal -1/8 binary64))
(*.f64 M M)
M
#s(literal -1/8 binary64)
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(/.f64 (*.f64 D D) d)
(*.f64 D D)
D
d
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(/.f64 h (pow.f64 l #s(literal 3 binary64)))
h
(pow.f64 l #s(literal 3 binary64))
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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d))
(.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)
(exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)))
(.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))
(log.f64 (*.f64 l h))
(*.f64 l h)
l
h
#s(literal -1/2 binary64)
d

Outputs
(.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 h #s(literal -1/8 binary64)) (/.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) l) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d h)))
(.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 h #s(literal -1/8 binary64)) (/.f64 (pow.f64 (*.f64 (/.f64 M d) D) #s(literal 2 binary64)) l) #s(literal 1 binary64)))
(fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64))
(fma.f64 (.f64 h #s(literal -1/8 binary64)) (/.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) l) #s(literal 1 binary64))
(*.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 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))
(.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64))
#s(literal 1/4 binary64)
(pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 M d) D) #s(literal 2 binary64))
(*.f64 D (/.f64 M d))
(*.f64 (/.f64 M d) D)
D
(/.f64 M d)
M
d
#s(literal 2 binary64)
#s(literal 1 binary64)
(sqrt.f64 (/.f64 d l))
(/.f64 d l)
(sqrt.f64 (/.f64 d h))
(/.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 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 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
(/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))
(sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d))
(*.f64 (/.f64 (neg.f64 d) l) d)
(/.f64 (neg.f64 d) l)
(neg.f64 d)
d
l
(sqrt.f64 (neg.f64 h))
(neg.f64 h)
h
#s(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 (* (* (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 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 D D) d)) (.f64 #s(literal -1/8 binary64) (*.f64 M M))))
(.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 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 D D) d)) (.f64 #s(literal -1/8 binary64) (*.f64 M M)))
(.f64 (.f64 M M) #s(literal -1/8 binary64))
(.f64 #s(literal -1/8 binary64) (.f64 M M))
(*.f64 M 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 h (pow.f64 l #s(literal 3 binary64)))) (/.f64 (.f64 D D) d))
(/.f64 (*.f64 D D) d)
(*.f64 D D)
D
d
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(/.f64 h (pow.f64 l #s(literal 3 binary64)))
h
(pow.f64 l #s(literal 3 binary64))
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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (.f64 l h) #s(literal -1/2 binary64)) d))
(.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)
(.f64 (pow.f64 (.f64 l h) #s(literal -1/2 binary64)) d)
(exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)))
(pow.f64 (*.f64 l h) #s(literal -1/2 binary64))
(.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))
(log.f64 (*.f64 l h))
(*.f64 l h)
l
h
#s(literal -1/2 binary64)
d

localize182.0ms (1%)

Memory

2.9MiB live, 243.3MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.12109375	(.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)
accuracy	2.312446724357451	(exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)))
accuracy	8.370667566794474	(log.f64 (*.f64 l h))
accuracy	27.15703648380438	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d))
accuracy	5.162524116007755	(.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))))))
accuracy	6.598469158041338	(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
accuracy	8.699818581040864	(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
accuracy	28.43115949818931	#s(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)))))))
accuracy	0.07421875	(*.f64 (/.f64 (neg.f64 d) l) d)
accuracy	1.737600032703101	(/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))
accuracy	9.436811181844496	(sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d))
accuracy	16.38210316504425	#s(approx (* (* (pow (/ 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))))
accuracy	0	(*.f64 l h)
accuracy	0.09375	(/.f64 d (sqrt.f64 (*.f64 l h)))
accuracy	8.224467590455466	(sqrt.f64 (*.f64 l h))
accuracy	27.15703648380438	#s(approx (* (* (pow (/ d h) (/ 1 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	1.9755277030170304	(*.f64 D (/.f64 M d))
accuracy	5.268550299673785	(fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64))
accuracy	7.595896100789357	(sqrt.f64 (/.f64 d h))
accuracy	7.752699324015803	(sqrt.f64 (/.f64 d l))

Samples

71.0ms	136×	0	invalid
57.0ms	120×	0	valid

Compiler

Compiled 417 to 62 computations (85.1% saved)

Precisions

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

ival-mult: 31.0ms (35.3% of total)

ival-div: 17.0ms (19.3% of total)

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

ival-sqrt: 9.0ms (10.2% of total)

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

ival-exp: 3.0ms (3.4% of total)

ival-log: 3.0ms (3.4% of total)

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

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

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

exact: 1.0ms (1.1% of total)

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

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

series354.0ms (2%)

Memory

56.9MiB live, 540.0MiB allocated

Counts

26 → 960

Calls

Call 1

Inputs
#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())
#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/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 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 #s(approx (* (* (pow (/ 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)))) (patch #s(approx ( (* (pow (/ 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)))) #<representation binary64>) () ())
#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.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 (.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))))))) (patch #s(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))))))) #<representation binary64>) () ())
#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 M M) #s(literal -1/8 binary64)) (patch (.f64 (.f64 M M) #s(literal -1/8 binary64)) #<representation binary64>) () ())
#s(alt (.f64 M M) (patch (.f64 M M) #<representation binary64>) () ())
#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)) #<representation binary64>) () ())
#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())
#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())
#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())
#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())

Outputs
#s(alt 1 (taylor 0 h) (#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/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 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 #s(approx (* (* (pow (/ 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)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log h) (log l))) (taylor 0 h) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log h) (log l))) (taylor 0 h) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log h) (log l))) (taylor 0 h) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log h) (log l))) (taylor 0 h) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor 0 h) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (log h) (log l)) (taylor 0 h) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log h) (log l)) (taylor 0 h) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log h) (log l)) (taylor 0 h) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log h) (log l)) (taylor 0 h) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l 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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/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 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 (* -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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.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 #s(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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log l) (* -1 (log (/ 1 h))))) (taylor inf h) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log l) (* -1 (log (/ 1 h))))) (taylor inf h) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log l) (* -1 (log (/ 1 h))))) (taylor inf h) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log l) (* -1 (log (/ 1 h))))) (taylor inf h) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor inf h) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (log l) (* -1 (log (/ 1 h)))) (taylor inf h) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log l) (* -1 (log (/ 1 h)))) (taylor inf h) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log l) (* -1 (log (/ 1 h)))) (taylor inf h) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log l) (* -1 (log (/ 1 h)))) (taylor inf h) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l 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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/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 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 (* -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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) 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))))) (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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log (* -1 l)) (* -1 (log (/ -1 h))))) (taylor -inf h) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log (* -1 l)) (* -1 (log (/ -1 h))))) (taylor -inf h) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log (* -1 l)) (* -1 (log (/ -1 h))))) (taylor -inf h) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log (* -1 l)) (* -1 (log (/ -1 h))))) (taylor -inf h) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<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 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (log (* -1 l)) (* -1 (log (/ -1 h)))) (taylor -inf h) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log (* -1 l)) (* -1 (log (/ -1 h)))) (taylor -inf h) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log (* -1 l)) (* -1 (log (/ -1 h)))) (taylor -inf h) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log (* -1 l)) (* -1 (log (/ -1 h)))) (taylor -inf h) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (pow M 2)) (taylor 0 M) (#s(alt (.f64 (.f64 M M) #s(literal -1/8 binary64)) (patch (.f64 (.f64 M M) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (pow M 2)) (taylor 0 M) (#s(alt (.f64 (.f64 M M) #s(literal -1/8 binary64)) (patch (.f64 (.f64 M M) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (pow M 2)) (taylor 0 M) (#s(alt (.f64 (.f64 M M) #s(literal -1/8 binary64)) (patch (.f64 (.f64 M M) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (pow M 2)) (taylor 0 M) (#s(alt (.f64 (.f64 M M) #s(literal -1/8 binary64)) (patch (.f64 (.f64 M M) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow M 2) (taylor 0 M) (#s(alt (.f64 M M) (patch (.f64 M M) #<representation binary64>) () ())) ())
#s(alt (pow M 2) (taylor 0 M) (#s(alt (.f64 M M) (patch (.f64 M M) #<representation binary64>) () ())) ())
#s(alt (pow M 2) (taylor 0 M) (#s(alt (.f64 M M) (patch (.f64 M M) #<representation binary64>) () ())) ())
#s(alt (pow M 2) (taylor 0 M) (#s(alt (.f64 M M) (patch (.f64 M M) #<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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M 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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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)) 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 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (pow M 2)) (taylor inf M) (#s(alt (.f64 (.f64 M M) #s(literal -1/8 binary64)) (patch (.f64 (.f64 M M) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (pow M 2)) (taylor inf M) (#s(alt (.f64 (.f64 M M) #s(literal -1/8 binary64)) (patch (.f64 (.f64 M M) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (pow M 2)) (taylor inf M) (#s(alt (.f64 (.f64 M M) #s(literal -1/8 binary64)) (patch (.f64 (.f64 M M) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (pow M 2)) (taylor inf M) (#s(alt (.f64 (.f64 M M) #s(literal -1/8 binary64)) (patch (.f64 (.f64 M M) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow M 2) (taylor inf M) (#s(alt (.f64 M M) (patch (.f64 M M) #<representation binary64>) () ())) ())
#s(alt (pow M 2) (taylor inf M) (#s(alt (.f64 M M) (patch (.f64 M M) #<representation binary64>) () ())) ())
#s(alt (pow M 2) (taylor inf M) (#s(alt (.f64 M M) (patch (.f64 M M) #<representation binary64>) () ())) ())
#s(alt (pow M 2) (taylor inf M) (#s(alt (.f64 M M) (patch (.f64 M M) #<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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M 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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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)) 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 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (pow M 2)) (taylor -inf M) (#s(alt (.f64 (.f64 M M) #s(literal -1/8 binary64)) (patch (.f64 (.f64 M M) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (pow M 2)) (taylor -inf M) (#s(alt (.f64 (.f64 M M) #s(literal -1/8 binary64)) (patch (.f64 (.f64 M M) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (pow M 2)) (taylor -inf M) (#s(alt (.f64 (.f64 M M) #s(literal -1/8 binary64)) (patch (.f64 (.f64 M M) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (pow M 2)) (taylor -inf M) (#s(alt (.f64 (.f64 M M) #s(literal -1/8 binary64)) (patch (.f64 (.f64 M M) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow M 2) (taylor -inf M) (#s(alt (.f64 M M) (patch (.f64 M M) #<representation binary64>) () ())) ())
#s(alt (pow M 2) (taylor -inf M) (#s(alt (.f64 M M) (patch (.f64 M M) #<representation binary64>) () ())) ())
#s(alt (pow M 2) (taylor -inf M) (#s(alt (.f64 M M) (patch (.f64 M M) #<representation binary64>) () ())) ())
#s(alt (pow M 2) (taylor -inf M) (#s(alt (.f64 M M) (patch (.f64 M M) #<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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M 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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/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 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 (* -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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor 0 l) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor 0 l) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor 0 l) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor 0 l) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log h) (log l))) (taylor 0 l) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log h) (log l))) (taylor 0 l) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log h) (log l))) (taylor 0 l) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log h) (log l))) (taylor 0 l) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor 0 l) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (log h) (log l)) (taylor 0 l) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log h) (log l)) (taylor 0 l) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log h) (log l)) (taylor 0 l) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log h) (log l)) (taylor 0 l) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/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 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 #s(approx (* (* (pow (/ 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)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor inf l) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor inf l) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor inf l) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor inf l) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log h) (* -1 (log (/ 1 l))))) (taylor inf l) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log h) (* -1 (log (/ 1 l))))) (taylor inf l) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log h) (* -1 (log (/ 1 l))))) (taylor inf l) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log h) (* -1 (log (/ 1 l))))) (taylor inf l) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor inf l) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (log h) (* -1 (log (/ 1 l)))) (taylor inf l) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log h) (* -1 (log (/ 1 l)))) (taylor inf l) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log h) (* -1 (log (/ 1 l)))) (taylor inf l) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log h) (* -1 (log (/ 1 l)))) (taylor inf l) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/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 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 #s(approx (* (* (pow (/ 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)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor -inf l) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor -inf l) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor -inf l) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor -inf l) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.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)))))) (patch (.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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) (patch (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log (* -1 h)) (* -1 (log (/ -1 l))))) (taylor -inf l) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log (* -1 h)) (* -1 (log (/ -1 l))))) (taylor -inf l) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log (* -1 h)) (* -1 (log (/ -1 l))))) (taylor -inf l) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (+ (log (* -1 h)) (* -1 (log (/ -1 l))))) (taylor -inf l) (#s(alt (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) (patch (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)) #<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 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (patch (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (log (* -1 h)) (* -1 (log (/ -1 l)))) (taylor -inf l) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log (* -1 h)) (* -1 (log (/ -1 l)))) (taylor -inf l) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log (* -1 h)) (* -1 (log (/ -1 l)))) (taylor -inf l) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (+ (log (* -1 h)) (* -1 (log (/ -1 l)))) (taylor -inf l) (#s(alt (log.f64 (.f64 l h)) (patch (log.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor 0 D) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor 0 D) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor 0 D) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor 0 D) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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)) 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 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor inf D) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor inf D) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor inf D) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor inf D) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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)) 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 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor -inf D) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor -inf D) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor -inf D) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor -inf D) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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)) 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 (* -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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor 0 d) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor 0 d) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor 0 d) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor 0 d) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d 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 (/ (* D M) d) (taylor 0 d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor 0 d) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 #s(approx (* (* (pow (/ 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)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor inf d) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor inf d) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor inf d) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor inf d) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<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 (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 (/ (* D M) d) (taylor inf d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor inf d) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<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 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))) (patch #s(approx ( (* (pow (/ 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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (neg.f64 d) l) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor -inf d) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor -inf d) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor -inf d) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.f64 d) l) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (pow d 2) l)) (taylor -inf d) (#s(alt (.f64 (/.f64 (neg.f64 d) l) d) (patch (.f64 (/.f64 (neg.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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 (.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))))))) (patch #s(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))))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) (patch (.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)))))) #<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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) (patch (.f64 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))) d) #<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 (* (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 (/ (* D M) d) (taylor -inf d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor -inf d) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor -inf d) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor -inf d) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (/ (pow D 2) d) (sqrt (/ h (pow l 3)))) (taylor -inf d) (#s(alt (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (patch (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) #<representation binary64>) () ())) ())

Calls

15 calls:

Time	Variable		Point	Expression
65.0ms	h	@	-inf	((+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (* (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (* (/ h l) -1/2) (* (* (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) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt (* (/ (neg d) l) d)) (sqrt (neg h))) (sqrt (* (/ (neg d) l) d)) (* (/ (neg d) l) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* M M) -1/8) (* (/ (* D D) d) (sqrt (/ h (pow l 3))))) (* (* M M) -1/8) (* M M) (exp (* (log (* l h)) -1/2)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (exp (* (log (* l h)) -1/2)) d) (* (log (* l h)) -1/2) (sqrt (/ d l)) (sqrt (/ d h)) (* D (/ M d)) (sqrt (/ h (pow l 3))) (* (/ (* D D) d) (sqrt (/ h (pow l 3)))) (log (* l h)))
58.0ms	h	@	0	((+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (* (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (* (/ h l) -1/2) (* (* (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) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt (* (/ (neg d) l) d)) (sqrt (neg h))) (sqrt (* (/ (neg d) l) d)) (* (/ (neg d) l) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* M M) -1/8) (* (/ (* D D) d) (sqrt (/ h (pow l 3))))) (* (* M M) -1/8) (* M M) (exp (* (log (* l h)) -1/2)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (exp (* (log (* l h)) -1/2)) d) (* (log (* l h)) -1/2) (sqrt (/ d l)) (sqrt (/ d h)) (* D (/ M d)) (sqrt (/ h (pow l 3))) (* (/ (* D D) d) (sqrt (/ h (pow l 3)))) (log (* l h)))
43.0ms	l	@	-inf	((+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (* (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (* (/ h l) -1/2) (* (* (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) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt (* (/ (neg d) l) d)) (sqrt (neg h))) (sqrt (* (/ (neg d) l) d)) (* (/ (neg d) l) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* M M) -1/8) (* (/ (* D D) d) (sqrt (/ h (pow l 3))))) (* (* M M) -1/8) (* M M) (exp (* (log (* l h)) -1/2)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (exp (* (log (* l h)) -1/2)) d) (* (log (* l h)) -1/2) (sqrt (/ d l)) (sqrt (/ d h)) (* D (/ M d)) (sqrt (/ h (pow l 3))) (* (/ (* D D) d) (sqrt (/ h (pow l 3)))) (log (* l h)))
35.0ms	l	@	inf	((+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (* (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (* (/ h l) -1/2) (* (* (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) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt (* (/ (neg d) l) d)) (sqrt (neg h))) (sqrt (* (/ (neg d) l) d)) (* (/ (neg d) l) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* M M) -1/8) (* (/ (* D D) d) (sqrt (/ h (pow l 3))))) (* (* M M) -1/8) (* M M) (exp (* (log (* l h)) -1/2)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (exp (* (log (* l h)) -1/2)) d) (* (log (* l h)) -1/2) (sqrt (/ d l)) (sqrt (/ d h)) (* D (/ M d)) (sqrt (/ h (pow l 3))) (* (/ (* D D) d) (sqrt (/ h (pow l 3)))) (log (* l h)))
21.0ms	l	@	0	((+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (* (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (* (/ h l) -1/2) (* (* (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) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt (* (/ (neg d) l) d)) (sqrt (neg h))) (sqrt (* (/ (neg d) l) d)) (* (/ (neg d) l) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* M M) -1/8) (* (/ (* D D) d) (sqrt (/ h (pow l 3))))) (* (* M M) -1/8) (* M M) (exp (* (log (* l h)) -1/2)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (exp (* (log (* l h)) -1/2)) d) (* (log (* l h)) -1/2) (sqrt (/ d l)) (sqrt (/ d h)) (* D (/ M d)) (sqrt (/ h (pow l 3))) (* (/ (* D D) d) (sqrt (/ h (pow l 3)))) (log (* l h)))

simplify339.0ms (1.9%)

Memory

-24.1MiB live, 356.4MiB allocated

Algorithm

1×	egg-herbie

Rules

8 142×	`lower-*.f64`
8 142×	`lower-*.f32`
4 714×	`lower-fma.f64`
4 714×	`lower-fma.f32`
2 740×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	262	14755
1	748	14275
2	2531	14219
3	5692	14163
0	8246	13851

Stop Event

1×	iter limit
1×	node limit

Counts

960 → 960

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 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/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 (* 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))))
(/ (+ (* -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))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -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 (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(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)
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/2 (+ (log h) (log l)))
(* -1/2 (+ (log h) (log l)))
(* -1/2 (+ (log h) (log l)))
(* -1/2 (+ (log h) (log l)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(+ (log h) (log l))
(+ (log h) (log l))
(+ (log h) (log l))
(+ (log h) (log 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) 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/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))))))
(* 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)
(* -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))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(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))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/2 (+ (log l) (* -1 (log (/ 1 h)))))
(* -1/2 (+ (log l) (* -1 (log (/ 1 h)))))
(* -1/2 (+ (log l) (* -1 (log (/ 1 h)))))
(* -1/2 (+ (log l) (* -1 (log (/ 1 h)))))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(+ (log l) (* -1 (log (/ 1 h))))
(+ (log l) (* -1 (log (/ 1 h))))
(+ (log l) (* -1 (log (/ 1 h))))
(+ (log l) (* -1 (log (/ 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) 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/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)))))))))
(* 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)
(* -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))))
(* -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/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(* -1/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))))
(* -1/2 (+ (log (* -1 l)) (* -1 (log (/ -1 h)))))
(* -1/2 (+ (log (* -1 l)) (* -1 (log (/ -1 h)))))
(* -1/2 (+ (log (* -1 l)) (* -1 (log (/ -1 h)))))
(* -1/2 (+ (log (* -1 l)) (* -1 (log (/ -1 h)))))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3)))))
(+ (log (* -1 l)) (* -1 (log (/ -1 h))))
(+ (log (* -1 l)) (* -1 (log (/ -1 h))))
(+ (log (* -1 l)) (* -1 (log (/ -1 h))))
(+ (log (* -1 l)) (* -1 (log (/ -1 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))))
(* 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))
(+ (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)))))))
(* 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (pow M 2))
(* -1/8 (pow M 2))
(* -1/8 (pow M 2))
(* -1/8 (pow M 2))
(pow M 2)
(pow M 2)
(pow M 2)
(pow M 2)
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* -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 (* (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)) 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)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (pow M 2))
(* -1/8 (pow M 2))
(* -1/8 (pow M 2))
(* -1/8 (pow M 2))
(pow M 2)
(pow M 2)
(pow M 2)
(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))))))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* -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 (* (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)) 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)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (pow M 2))
(* -1/8 (pow M 2))
(* -1/8 (pow M 2))
(* -1/8 (pow M 2))
(pow M 2)
(pow M 2)
(pow M 2)
(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))))))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* -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) 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/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))
(* 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)
(* -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))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* -1 (/ (pow d 2) l))
(* -1 (/ (pow d 2) l))
(* -1 (/ (pow d 2) l))
(* -1 (/ (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)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/2 (+ (log h) (log l)))
(* -1/2 (+ (log h) (log l)))
(* -1/2 (+ (log h) (log l)))
(* -1/2 (+ (log h) (log l)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(+ (log h) (log l))
(+ (log h) (log l))
(+ (log h) (log l))
(+ (log h) (log 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 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/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 (* 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))))
(+ (* -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))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* -1 (/ (pow d 2) l))
(* -1 (/ (pow d 2) l))
(* -1 (/ (pow d 2) l))
(* -1 (/ (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)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(sqrt (/ 1 (* h l)))
(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))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/2 (+ (log h) (* -1 (log (/ 1 l)))))
(* -1/2 (+ (log h) (* -1 (log (/ 1 l)))))
(* -1/2 (+ (log h) (* -1 (log (/ 1 l)))))
(* -1/2 (+ (log h) (* -1 (log (/ 1 l)))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(sqrt (/ h (pow l 3)))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(+ (log h) (* -1 (log (/ 1 l))))
(+ (log h) (* -1 (log (/ 1 l))))
(+ (log h) (* -1 (log (/ 1 l))))
(+ (log h) (* -1 (log (/ 1 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 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/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 (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))))
(+ (* -1/8 (* (/ (* (pow 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))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* -1 (/ (pow d 2) l))
(* -1 (/ (pow d 2) l))
(* -1 (/ (pow d 2) l))
(* -1 (/ (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/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* (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))
(* (* 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))))
(* -1/2 (+ (log (* -1 h)) (* -1 (log (/ -1 l)))))
(* -1/2 (+ (log (* -1 h)) (* -1 (log (/ -1 l)))))
(* -1/2 (+ (log (* -1 h)) (* -1 (log (/ -1 l)))))
(* -1/2 (+ (log (* -1 h)) (* -1 (log (/ -1 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 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3)))))
(+ (log (* -1 h)) (* -1 (log (/ -1 l))))
(+ (log (* -1 h)) (* -1 (log (/ -1 l))))
(+ (log (* -1 h)) (* -1 (log (/ -1 l))))
(+ (log (* -1 h)) (* -1 (log (/ -1 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 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)))))))
(* 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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* -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 (* (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)) 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)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* -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 (* (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)) 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)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (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)) 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 (* (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)) 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)
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* -1 (/ (pow d 2) l))
(* -1 (/ (pow d 2) l))
(* -1 (/ (pow d 2) l))
(* -1 (/ (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)
(* -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 (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (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))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (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)))))))
(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))))))))
(* 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)))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* -1 (/ (pow d 2) l))
(* -1 (/ (pow d 2) l))
(* -1 (/ (pow d 2) l))
(* -1 (/ (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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -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)) (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))))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (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 (* (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 (* (* 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 (* 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)) (sqrt (/ 1 l))))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(* -1 (/ (pow d 2) l))
(* -1 (/ (pow d 2) l))
(* -1 (/ (pow d 2) l))
(* -1 (/ (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/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -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)))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))

Outputs
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (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 D D)) (/.f64 (.f64 M M) 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 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d 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))
(* 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 (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 D D)) (/.f64 (.f64 M M) 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 D D)) (/.f64 (.f64 M M) 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)
(/ (+ (* -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 (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 D D)) (/.f64 (.f64 M M) 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 D D)) (/.f64 (.f64 M M) 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)
(* 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 (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 D D)) (/.f64 (.f64 M M) 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 D D)) (/.f64 (.f64 M M) 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 (/ 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 (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 (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 (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))))))
(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)))
(* 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 (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 D D)) (/.f64 (.f64 M M) 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 D D)) (/.f64 (.f64 M M) 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)
(* -1/2 (+ (log h) (log l)))
(*.f64 (+.f64 (log.f64 l) (log.f64 h)) #s(literal -1/2 binary64))
(* -1/2 (+ (log h) (log l)))
(*.f64 (+.f64 (log.f64 l) (log.f64 h)) #s(literal -1/2 binary64))
(* -1/2 (+ (log h) (log l)))
(*.f64 (+.f64 (log.f64 l) (log.f64 h)) #s(literal -1/2 binary64))
(* -1/2 (+ (log h) (log l)))
(*.f64 (+.f64 (log.f64 l) (log.f64 h)) #s(literal -1/2 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 (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(+ (log h) (log l))
(+.f64 (log.f64 l) (log.f64 h))
(+ (log h) (log l))
(+.f64 (log.f64 l) (log.f64 h))
(+ (log h) (log l))
(+.f64 (log.f64 l) (log.f64 h))
(+ (log h) (log l))
(+.f64 (log.f64 l) (log.f64 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))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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 D D)) (/.f64 (.f64 M M) 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 D D)) (/.f64 (.f64 M M) 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 D D)) (/.f64 (.f64 M M) 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)) (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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d 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))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (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 D D)) (/.f64 (.f64 M M) 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 D D)) (/.f64 (.f64 M M) 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)
(* -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 D D)) (/.f64 (.f64 M M) 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 D D)) (/.f64 (.f64 M M) 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 D D)) (/.f64 (.f64 M M) 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)
(* -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 D D)) (/.f64 (.f64 M M) 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 D D)) (/.f64 (.f64 M M) 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 D D)) (/.f64 (.f64 M M) 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))))))
(* -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 (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 (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))))))
(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/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 D D)) (/.f64 (.f64 M M) 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 D D)) (/.f64 (.f64 M M) 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 D D)) (/.f64 (.f64 M M) 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)
(* -1/2 (+ (log l) (* -1 (log (/ 1 h)))))
(*.f64 (+.f64 (log.f64 l) (log.f64 h)) #s(literal -1/2 binary64))
(* -1/2 (+ (log l) (* -1 (log (/ 1 h)))))
(*.f64 (+.f64 (log.f64 l) (log.f64 h)) #s(literal -1/2 binary64))
(* -1/2 (+ (log l) (* -1 (log (/ 1 h)))))
(*.f64 (+.f64 (log.f64 l) (log.f64 h)) #s(literal -1/2 binary64))
(* -1/2 (+ (log l) (* -1 (log (/ 1 h)))))
(*.f64 (+.f64 (log.f64 l) (log.f64 h)) #s(literal -1/2 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 (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(+ (log l) (* -1 (log (/ 1 h))))
(+.f64 (log.f64 l) (log.f64 h))
(+ (log l) (* -1 (log (/ 1 h))))
(+.f64 (log.f64 l) (log.f64 h))
(+ (log l) (* -1 (log (/ 1 h))))
(+.f64 (log.f64 l) (log.f64 h))
(+ (log l) (* -1 (log (/ 1 h))))
(+.f64 (log.f64 l) (log.f64 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 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) 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 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) 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 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) 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 (.f64 (neg.f64 M) M) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #s(literal -1/8 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 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (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)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (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)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (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)))
(* -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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d 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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 (neg.f64 M) M) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #s(literal -1/8 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 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (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)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (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)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (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)))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(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)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 (neg.f64 M) M) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #s(literal -1/8 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 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (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)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (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)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (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)))
(* (* 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)))))
(.f64 (.f64 (.f64 (neg.f64 M) M) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #s(literal -1/8 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 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (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)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (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)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (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)))
(* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 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) (pow (sqrt -1) 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) (pow (sqrt -1) 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) (pow (sqrt -1) 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))))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 (neg.f64 M) M) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))) #s(literal -1/8 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 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (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)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (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)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (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)))
(* (* 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/2 (+ (log (* -1 l)) (* -1 (log (/ -1 h)))))
(*.f64 (+.f64 (log.f64 (neg.f64 h)) (log.f64 (neg.f64 l))) #s(literal -1/2 binary64))
(* -1/2 (+ (log (* -1 l)) (* -1 (log (/ -1 h)))))
(*.f64 (+.f64 (log.f64 (neg.f64 h)) (log.f64 (neg.f64 l))) #s(literal -1/2 binary64))
(* -1/2 (+ (log (* -1 l)) (* -1 (log (/ -1 h)))))
(*.f64 (+.f64 (log.f64 (neg.f64 h)) (log.f64 (neg.f64 l))) #s(literal -1/2 binary64))
(* -1/2 (+ (log (* -1 l)) (* -1 (log (/ -1 h)))))
(*.f64 (+.f64 (log.f64 (neg.f64 h)) (log.f64 (neg.f64 l))) #s(literal -1/2 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 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(+ (log (* -1 l)) (* -1 (log (/ -1 h))))
(+.f64 (log.f64 (neg.f64 h)) (log.f64 (neg.f64 l)))
(+ (log (* -1 l)) (* -1 (log (/ -1 h))))
(+.f64 (log.f64 (neg.f64 h)) (log.f64 (neg.f64 l)))
(+ (log (* -1 l)) (* -1 (log (/ -1 h))))
(+.f64 (log.f64 (neg.f64 h)) (log.f64 (neg.f64 l)))
(+ (log (* -1 l)) (* -1 (log (/ -1 h))))
(+.f64 (log.f64 (neg.f64 h)) (log.f64 (neg.f64 l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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 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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (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 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/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 (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 (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 (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 M 2))
(.f64 (.f64 M M) #s(literal -1/8 binary64))
(* -1/8 (pow M 2))
(.f64 (.f64 M M) #s(literal -1/8 binary64))
(* -1/8 (pow M 2))
(.f64 (.f64 M M) #s(literal -1/8 binary64))
(* -1/8 (pow M 2))
(.f64 (.f64 M M) #s(literal -1/8 binary64))
(pow M 2)
(*.f64 M M)
(pow M 2)
(*.f64 M M)
(pow M 2)
(*.f64 M M)
(pow M 2)
(*.f64 M M)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (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 M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(* -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))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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) 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 l #s(literal 3 binary64))) (pow.f64 d #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 h (*.f64 D D)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #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 h (*.f64 D D)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #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 h (*.f64 D D)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (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))))))
(* (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)) 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 (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 (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 (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 M 2))
(.f64 (.f64 M M) #s(literal -1/8 binary64))
(* -1/8 (pow M 2))
(.f64 (.f64 M M) #s(literal -1/8 binary64))
(* -1/8 (pow M 2))
(.f64 (.f64 M M) #s(literal -1/8 binary64))
(* -1/8 (pow M 2))
(.f64 (.f64 M M) #s(literal -1/8 binary64))
(pow M 2)
(*.f64 M M)
(pow M 2)
(*.f64 M M)
(pow M 2)
(*.f64 M M)
(pow M 2)
(*.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))))))
(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))
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(* -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))
(* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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) 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 l #s(literal 3 binary64))) (pow.f64 d #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 h (*.f64 D D)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #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 h (*.f64 D D)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #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 h (*.f64 D D)) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (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))))))
(* (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)) 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 (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 (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 (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 M 2))
(.f64 (.f64 M M) #s(literal -1/8 binary64))
(* -1/8 (pow M 2))
(.f64 (.f64 M M) #s(literal -1/8 binary64))
(* -1/8 (pow M 2))
(.f64 (.f64 M M) #s(literal -1/8 binary64))
(* -1/8 (pow M 2))
(.f64 (.f64 M M) #s(literal -1/8 binary64))
(pow M 2)
(*.f64 M M)
(pow M 2)
(*.f64 M M)
(pow M 2)
(*.f64 M M)
(pow M 2)
(*.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))))))
(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))
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(* -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))
(/ (+ 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 #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 (* (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 l #s(literal 3 binary64))) (pow.f64 d #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 h (.f64 M M))) (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 h (.f64 M M))) (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 h (.f64 M M))) (sqrt.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 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))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(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)
(* -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)
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) 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 (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) 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 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.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))
(* -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 (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 (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 (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))))))
(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/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)
(* -1/2 (+ (log h) (log l)))
(*.f64 (+.f64 (log.f64 l) (log.f64 h)) #s(literal -1/2 binary64))
(* -1/2 (+ (log h) (log l)))
(*.f64 (+.f64 (log.f64 l) (log.f64 h)) #s(literal -1/2 binary64))
(* -1/2 (+ (log h) (log l)))
(*.f64 (+.f64 (log.f64 l) (log.f64 h)) #s(literal -1/2 binary64))
(* -1/2 (+ (log h) (log l)))
(*.f64 (+.f64 (log.f64 l) (log.f64 h)) #s(literal -1/2 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))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(+ (log h) (log l))
(+.f64 (log.f64 l) (log.f64 h))
(+ (log h) (log l))
(+.f64 (log.f64 l) (log.f64 h))
(+ (log h) (log l))
(+.f64 (log.f64 l) (log.f64 h))
(+ (log h) (log l))
(+.f64 (log.f64 l) (log.f64 h))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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 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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d 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))
(* 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)
(+ (* -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)
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) 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 (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) 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 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.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 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/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 (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 (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 (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))))))
(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)))
(* 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)
(* -1/2 (+ (log h) (* -1 (log (/ 1 l)))))
(*.f64 (+.f64 (log.f64 l) (log.f64 h)) #s(literal -1/2 binary64))
(* -1/2 (+ (log h) (* -1 (log (/ 1 l)))))
(*.f64 (+.f64 (log.f64 l) (log.f64 h)) #s(literal -1/2 binary64))
(* -1/2 (+ (log h) (* -1 (log (/ 1 l)))))
(*.f64 (+.f64 (log.f64 l) (log.f64 h)) #s(literal -1/2 binary64))
(* -1/2 (+ (log h) (* -1 (log (/ 1 l)))))
(*.f64 (+.f64 (log.f64 l) (log.f64 h)) #s(literal -1/2 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))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(sqrt (/ h (pow l 3)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(+ (log h) (* -1 (log (/ 1 l))))
(+.f64 (log.f64 l) (log.f64 h))
(+ (log h) (* -1 (log (/ 1 l))))
(+.f64 (log.f64 l) (log.f64 h))
(+ (log h) (* -1 (log (/ 1 l))))
(+.f64 (log.f64 l) (log.f64 h))
(+ (log h) (* -1 (log (/ 1 l))))
(+.f64 (log.f64 l) (log.f64 h))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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)))))
(neg.f64 (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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(neg.f64 (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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(neg.f64 (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 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 h (.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) (*.f64 D D))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #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 h (.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) (*.f64 D D))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #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 h (.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) (*.f64 D D))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (/.f64 d 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))
(* (* 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)))))
(neg.f64 (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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(neg.f64 (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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(neg.f64 (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)
(* -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))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(neg.f64 (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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(neg.f64 (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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(neg.f64 (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)
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) 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 (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) 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 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.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)))))
(neg.f64 (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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(neg.f64 (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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(neg.f64 (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) (pow (sqrt -1) 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) (pow (sqrt -1) 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) (pow (sqrt -1) 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) (pow (sqrt -1) 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))))))
(* (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))))
(* (* 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)))))
(neg.f64 (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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(neg.f64 (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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(neg.f64 (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 (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/2 (+ (log (* -1 h)) (* -1 (log (/ -1 l)))))
(*.f64 (-.f64 (log.f64 (neg.f64 h)) (log.f64 (/.f64 #s(literal -1 binary64) l))) #s(literal -1/2 binary64))
(* -1/2 (+ (log (* -1 h)) (* -1 (log (/ -1 l)))))
(*.f64 (-.f64 (log.f64 (neg.f64 h)) (log.f64 (/.f64 #s(literal -1 binary64) l))) #s(literal -1/2 binary64))
(* -1/2 (+ (log (* -1 h)) (* -1 (log (/ -1 l)))))
(*.f64 (-.f64 (log.f64 (neg.f64 h)) (log.f64 (/.f64 #s(literal -1 binary64) l))) #s(literal -1/2 binary64))
(* -1/2 (+ (log (* -1 h)) (* -1 (log (/ -1 l)))))
(*.f64 (-.f64 (log.f64 (neg.f64 h)) (log.f64 (/.f64 #s(literal -1 binary64) l))) #s(literal -1/2 binary64))
(* (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 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* -1 (* (/ (* (pow D 2) (pow (sqrt -1) 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(+ (log (* -1 h)) (* -1 (log (/ -1 l))))
(-.f64 (log.f64 (neg.f64 h)) (log.f64 (/.f64 #s(literal -1 binary64) l)))
(+ (log (* -1 h)) (* -1 (log (/ -1 l))))
(-.f64 (log.f64 (neg.f64 h)) (log.f64 (/.f64 #s(literal -1 binary64) l)))
(+ (log (* -1 h)) (* -1 (log (/ -1 l))))
(-.f64 (log.f64 (neg.f64 h)) (log.f64 (/.f64 #s(literal -1 binary64) l)))
(+ (log (* -1 h)) (* -1 (log (/ -1 l))))
(-.f64 (log.f64 (neg.f64 h)) (log.f64 (/.f64 #s(literal -1 binary64) l)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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 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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (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 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/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 (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 (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 (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))))))
(* 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 M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.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) 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))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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) 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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (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))))))
(* (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)) 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 (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 (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 (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 (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))
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.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) 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))
(* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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) 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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #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 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (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))))))
(* (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)) 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 (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 (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 (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 (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))
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.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) 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)) 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) 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 l #s(literal 3 binary64))) (pow.f64 d #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 h (.f64 M M))) (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 h (.f64 M M))) (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 h (.f64 M M))) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) 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 #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)
(* -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)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) 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 (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) 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 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.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 (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/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 (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 (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 (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)
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d 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 M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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 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 h (.f64 M M))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 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 h (.f64 M M))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 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 h (.f64 M M))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) 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)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(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))))
(.f64 (sqrt.f64 (/.f64 #s(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)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) 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 (sqrt -1)) (sqrt (/ 1 l)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (.f64 (sqrt.f64 #s(literal -1 binary64)) 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 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.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)
(* -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 (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 (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 (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))))))
(* 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)
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d 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 M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #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 (.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 (+ (* -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 (.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 (+ (* -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 (.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 (/ 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 #s(literal -1/8 binary64) (.f64 D D)) (.f64 h (.f64 M M))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) 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 #s(literal -1/8 binary64) (.f64 D D)) (.f64 h (.f64 M M))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) d))) 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 #s(literal -1/8 binary64) (.f64 D D)) (.f64 h (.f64 M M))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) l) 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 (.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 (+ (* -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 (.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 (+ (* -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 (.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)
(* -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 (.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 (+ (* -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 (.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 (+ (* -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 (.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))))
(* -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)) (sqrt (/ 1 l))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (neg.f64 d)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (neg.f64 d)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (neg.f64 d)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) l)) (neg.f64 d)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.f64 d l))
(* -1 (/ (pow d 2) l))
(*.f64 (neg.f64 d) (/.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 (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 (+ (* -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 (.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 (+ (* -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 (.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/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 (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 (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 (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 (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 (.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 (+ (* -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 (.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 (+ (* -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 (.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)
(* -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 (* (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))
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(/ (* D M) d)
(/.f64 (*.f64 M D) d)
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))

rewrite181.0ms (1%)

Memory

16.6MiB live, 204.4MiB allocated

Rules

4 742×	`lower-/.f32`
4 724×	`lower-/.f64`
4 690×	`lower-*.f32`
4 662×	`lower-*.f64`
2 100×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	67	352
0	104	326
1	315	318
2	1846	306
0	8225	299

Stop Event

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

Counts

26 → 934

Calls

Call 1

Inputs
(fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64))
(.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
(.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
(*.f64 (/.f64 h l) #s(literal -1/2 binary64))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
(/.f64 d (sqrt.f64 (*.f64 l h)))
(sqrt.f64 (*.f64 l h))
(*.f64 l h)
#s(approx (* (* (pow (/ 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))))
(/.f64 (sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h)))
(sqrt.f64 (*.f64 (/.f64 (neg.f64 d) l) d))
(*.f64 (/.f64 (neg.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 (.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 (.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 (.f64 M M) #s(literal -1/8 binary64))
(*.f64 M M)
(exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d))
(.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)
(.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64))
(sqrt.f64 (/.f64 d l))
(sqrt.f64 (/.f64 d h))
(*.f64 D (/.f64 M d))
(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
(.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))
(log.f64 (*.f64 l h))

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>

eval302.0ms (1.7%)

Memory: -2.2MiB live, 404.2MiB allocated
Compiler: Compiled 40 332 to 3 003 computations (92.6% saved)

prune209.0ms (1.2%)

Memory

-12.3MiB live, 427.4MiB allocated

Pruning

54 alts after pruning (50 fresh and 4 done)

	Pruned	Kept	Total
New	1 898	23	1 921
Fresh	12	27	39
Picked	2	3	5
Done	0	1	1
Total	1 912	54	1 966

Accuracy

94.5%

Counts

1 966 → 54

Alt Table

Click to see full alt table

Status	Accuracy	Program
	44.1%	(fma.f64 (/.f64 h l) (.f64 (.f64 (/.f64 (.f64 M (.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	29.8%	(fma.f64 (/.f64 h l) #s(approx (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	33.1%	(fma.f64 (/.f64 h l) #s(approx (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d))) (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	37.9%	(fma.f64 h (/.f64 (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) l) (/.f64 d (sqrt.f64 (.f64 l h))))
	41.9%	(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (*.f64 l h)) d))
▶	27.4%	(/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h)))
	34.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)))
	66.3%	(/.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 (/.f64 M d) D) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64))) (sqrt.f64 (/.f64 h d)))
	66.6%	(.f64 (.f64 (fma.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	66.9%	(.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 M (/.f64 D d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	32.2%	(.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (/.f64 d h)))
▶	67.8%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	66.8%	(.f64 (.f64 (fma.f64 (.f64 h #s(literal 1 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (*.f64 (/.f64 M d) D) #s(literal 2 binary64))) l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	66.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 d) h) (.f64 #s(literal 1/4 binary64) D)))))
	36.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/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))))))
	36.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (pow.f64 (neg.f64 l) #s(literal -1 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))))))
	34.4%	(.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 #s(literal 1/4 binary64) D) (.f64 (.f64 (/.f64 M d) h) (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l)))))
	36.0%	(.f64 (.f64 (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (pow.f64 (pow.f64 (neg.f64 d) #s(literal -1/2 binary64)) #s(literal -1 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))))))
	40.1%	(.f64 (.f64 #s(approx (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (/.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))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	28.3%	(.f64 (.f64 #s(approx (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	33.6%	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
▶	11.1%	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h)))
	23.1%	#s(approx (+ (* (/ h l) (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d)))) (sqrt (* (/ (/ d l) h) d))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	60.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) d) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	55.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (.f64 (/.f64 h l) (sqrt.f64 (/.f64 h l))) (.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	49.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 (fma.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) D) (/.f64 D d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	53.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 (fma.f64 M (.f64 (.f64 #s(literal -1/8 binary64) M) (.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 D D) d))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	4.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 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))
	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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)))
	17.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (-.f64 (.f64 #s(literal 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))))))
	21.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 l #s(literal -3/2 binary64)) (sqrt.f64 h)) (.f64 D D)) (.f64 #s(literal -1/8 binary64) (.f64 M M))) d))
✓	14.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 (neg.f64 d) l) d)) (sqrt.f64 (neg.f64 h))))
	15.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
	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)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	17.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h))
	24.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
✓	27.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))))
	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
	26.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 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1/4 binary64)) #s(literal 2 binary64)) d))
▶	4.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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))))
	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 (pow.f64 h #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 l))))
	24.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 (.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) M) d) (/.f64 M (pow.f64 D #s(literal -2 binary64)))) (sqrt.f64 l)) (/.f64 (sqrt.f64 h) (fabs.f64 l))))
	26.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 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
	20.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (.f64 D D) (sqrt.f64 h)) (.f64 d (pow.f64 l #s(literal 3/2 binary64))))))
	21.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (/.f64 (*.f64 D D) d) (fabs.f64 l)) (/.f64 (sqrt.f64 h) (sqrt.f64 l)))))
	23.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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (/.f64 (sqrt.f64 (/.f64 h l)) (fabs.f64 l)))))
	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 (sqrt.f64 (/.f64 (pow.f64 l #s(literal -1 binary64)) 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
	13.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 d (sqrt.f64 (*.f64 l h))) (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 (sqrt.f64 d))))
	60.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 (neg.f64 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) d) (.f64 (sqrt.f64 (/.f64 h l)) d))) (/.f64 #s(literal -1 binary64) h)))
✓	25.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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) 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 (exp.f64 (.f64 #s(approx (log (* l h)) (+.f64 (log.f64 (neg.f64 h)) (log.f64 (neg.f64 l)))) #s(literal -1/2 binary64))) d))
	28.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
▶	37.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))

Compiler

Compiled 2 198 to 1 841 computations (16.2% saved)

simplify123.0ms (0.7%)

Memory

10.8MiB live, 174.5MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(*.f64 (/.f64 h l) #s(literal -1/2 binary64))
cost-diff	0	(.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 d l) (neg.f64 d))))
cost-diff	0	(/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h)))
cost-diff	320	(fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64))
cost-diff	0	(neg.f64 h)
cost-diff	0	(pow.f64 (neg.f64 h) #s(literal -1/2 binary64))
cost-diff	0	(*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))
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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))))
cost-diff	0	(sqrt.f64 (/.f64 d l))
cost-diff	0	(neg.f64 (sqrt.f64 (/.f64 d l)))
cost-diff	0	#s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))
cost-diff	0	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h)))
cost-diff	0	(sqrt.f64 (*.f64 l h))
cost-diff	0	(/.f64 d (sqrt.f64 (*.f64 l h)))
cost-diff	0	(fabs.f64 (/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
cost-diff	0	(*.f64 (/.f64 h l) #s(literal -1/8 binary64))
cost-diff	0	(.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (*.f64 (/.f64 M d) D))
cost-diff	0	(.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))
cost-diff	0	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))

Rules

8 146×	`lower-*.f32`
8 120×	`lower-*.f64`
3 590×	`lower-/.f32`
3 576×	`lower-/.f64`
2 386×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	73	460
0	112	446
1	202	442
2	488	442
3	2409	442
4	5096	442
0	8400	432

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

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

localize244.0ms (1.4%)

Memory

11.6MiB live, 285.8MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	1.9755277030170304	(*.f64 D (/.f64 M d))
accuracy	3.1923947941775777	(.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 d l) (neg.f64 d))))
accuracy	5.268550299673785	(fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64))
accuracy	9.436811181844496	(sqrt.f64 (*.f64 (/.f64 d l) (neg.f64 d)))
accuracy	0	(neg.f64 h)
accuracy	0.13671875	(/.f64 d (sqrt.f64 (neg.f64 l)))
accuracy	1.741506282703101	(*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))
accuracy	27.15703648380438	#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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))))
accuracy	0.7891193111222272	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h)))
accuracy	7.595896100789357	(sqrt.f64 (/.f64 d h))
accuracy	7.752699324015803	(sqrt.f64 (/.f64 d l))
accuracy	29.05152482939943	#s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))
accuracy	0	(fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))
accuracy	0.09375	(/.f64 d (sqrt.f64 (*.f64 l h)))
accuracy	8.224467590455466	(sqrt.f64 (*.f64 l h))
accuracy	16.38210316504425	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
accuracy	1.9755277030170304	(*.f64 (/.f64 M d) D)
accuracy	5.065917621595652	(.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (*.f64 (/.f64 M d) D))
accuracy	7.595896100789357	(sqrt.f64 (/.f64 d h))
accuracy	7.752699324015803	(sqrt.f64 (/.f64 d l))

Samples

142.0ms	120×	0	valid
61.0ms	136×	0	invalid

Compiler

Compiled 451 to 62 computations (86.3% saved)

Precisions

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

ival-mult: 60.0ms (54.5% of total)

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

ival-pow: 13.0ms (11.8% of total)

ival-sqrt: 9.0ms (8.2% of total)

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

ival-neg: 4.0ms (3.6% of total)

ival-add: 2.0ms (1.8% of total)

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

ival-sub: 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)

series165.0ms (0.9%)

Memory

-10.1MiB live, 222.0MiB allocated

Counts

25 → 996

Calls

Call 1

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

Outputs
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor 0 h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor 0 h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor 0 h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor 0 h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 h) (#s(alt #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d 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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 h)) (sqrt -1)) (taylor 0 h) (#s(alt (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (patch (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 h)) (sqrt -1)) (taylor 0 h) (#s(alt (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (patch (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 h)) (sqrt -1)) (taylor 0 h) (#s(alt (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (patch (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 h)) (sqrt -1)) (taylor 0 h) (#s(alt (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (patch (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) #<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 (taylor 0 h) (#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<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/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/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 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 (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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)) 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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 h)) (sqrt -1)) (taylor inf h) (#s(alt (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (patch (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 h)) (sqrt -1)) (taylor inf h) (#s(alt (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (patch (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 h)) (sqrt -1)) (taylor inf h) (#s(alt (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (patch (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 h)) (sqrt -1)) (taylor inf h) (#s(alt (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (patch (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) #<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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 h) (#s(alt (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<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/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/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor -inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor -inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor -inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor -inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf h) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -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 (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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) (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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 h)) (sqrt -1)) (taylor -inf h) (#s(alt (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (patch (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 h)) (sqrt -1)) (taylor -inf h) (#s(alt (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (patch (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 h)) (sqrt -1)) (taylor -inf h) (#s(alt (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (patch (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 h)) (sqrt -1)) (taylor -inf h) (#s(alt (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (patch (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) #<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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf h) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<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 (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 M) (#s(alt #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 M) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 M) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 M) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 M) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M 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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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)) 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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf M) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf M) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf M) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf M) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M 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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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)) 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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf M) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf M) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf M) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf M) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf M) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M 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 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor 0 l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor 0 l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor 0 l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor 0 l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (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/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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 l) (#s(alt (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor 0 l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<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/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (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 (* 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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<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/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf l) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor -inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor -inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor -inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ h l)) (taylor -inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/8 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (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 (* 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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ h l)) (taylor -inf l) (#s(alt (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (patch (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<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/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 D) (#s(alt #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 D) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 D) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 D) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 D) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M 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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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)) 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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf D) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf D) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf D) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf D) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M 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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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)) 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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf D) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf D) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf D) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf D) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf D) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M 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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor 0 d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (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/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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<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 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 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 (/ (* D M) d) (taylor 0 d) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 d) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 d) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 d) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor 0 d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<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/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 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(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (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 (* 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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #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 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 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 (/ (* D M) d) (taylor inf d) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf d) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf d) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf d) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (sqrt -1)) (sqrt (/ 1 l))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor inf d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M 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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (patch (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* D (* M h)) (* d l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (patch (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (fabs (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) (patch (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* 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 (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (patch #s(approx (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M 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 (* (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 (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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) (patch (.f64 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M 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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h))) (patch (/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (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 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 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 (/ (* D M) d) (taylor -inf d) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf d) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf d) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf d) (#s(alt (.f64 (/.f64 M d) D) (patch (.f64 (/.f64 M d) D) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (/ d (sqrt -1)) (sqrt (/ 1 l))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (neg.f64 l))) (patch (/.f64 d (sqrt.f64 (neg.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) (patch (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d))) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (/ (* D M) d) (taylor -inf d) (#s(alt (.f64 D (/.f64 M d)) (patch (.f64 D (/.f64 M d)) #<representation binary64>) () ())) ())

Calls

15 calls:

Time	Variable		Point	Expression
37.0ms	h	@	0	((* (* (+ (* (* (* (/ h l) -1/8) (* (/ M d) D)) (* (/ M d) D)) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* (* (/ h l) -1/8) (* (/ M d) D)) (* (/ M d) D)) 1) (sqrt (/ d l))) (* (* (/ h l) -1/8) (* (/ M d) D)) (* (/ h l) -1/8) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs (/ d (sqrt (* l h)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg (sqrt (/ d l))) (sqrt (/ d l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (neg h) -1/2) (/ d (sqrt (neg l)))) (pow (neg h) -1/2) (neg h) (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (/ (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (* (/ d l) (neg d)))) (sqrt (neg h))) (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (* (/ d l) (neg d)))) (* (/ h l) -1/2) (sqrt (/ d h)) (* (/ M d) D) (/ d (sqrt (neg l))) (sqrt (* (/ d l) (neg d))) (* D (/ M d)))
9.0ms	d	@	inf	((* (* (+ (* (* (* (/ h l) -1/8) (* (/ M d) D)) (* (/ M d) D)) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* (* (/ h l) -1/8) (* (/ M d) D)) (* (/ M d) D)) 1) (sqrt (/ d l))) (* (* (/ h l) -1/8) (* (/ M d) D)) (* (/ h l) -1/8) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs (/ d (sqrt (* l h)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg (sqrt (/ d l))) (sqrt (/ d l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (neg h) -1/2) (/ d (sqrt (neg l)))) (pow (neg h) -1/2) (neg h) (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (/ (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (* (/ d l) (neg d)))) (sqrt (neg h))) (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (* (/ d l) (neg d)))) (* (/ h l) -1/2) (sqrt (/ d h)) (* (/ M d) D) (/ d (sqrt (neg l))) (sqrt (* (/ d l) (neg d))) (* D (/ M d)))
9.0ms	l	@	-inf	((* (* (+ (* (* (* (/ h l) -1/8) (* (/ M d) D)) (* (/ M d) D)) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* (* (/ h l) -1/8) (* (/ M d) D)) (* (/ M d) D)) 1) (sqrt (/ d l))) (* (* (/ h l) -1/8) (* (/ M d) D)) (* (/ h l) -1/8) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs (/ d (sqrt (* l h)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg (sqrt (/ d l))) (sqrt (/ d l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (neg h) -1/2) (/ d (sqrt (neg l)))) (pow (neg h) -1/2) (neg h) (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (/ (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (* (/ d l) (neg d)))) (sqrt (neg h))) (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (* (/ d l) (neg d)))) (* (/ h l) -1/2) (sqrt (/ d h)) (* (/ M d) D) (/ d (sqrt (neg l))) (sqrt (* (/ d l) (neg d))) (* D (/ M d)))
7.0ms	d	@	-inf	((* (* (+ (* (* (* (/ h l) -1/8) (* (/ M d) D)) (* (/ M d) D)) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* (* (/ h l) -1/8) (* (/ M d) D)) (* (/ M d) D)) 1) (sqrt (/ d l))) (* (* (/ h l) -1/8) (* (/ M d) D)) (* (/ h l) -1/8) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs (/ d (sqrt (* l h)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg (sqrt (/ d l))) (sqrt (/ d l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (neg h) -1/2) (/ d (sqrt (neg l)))) (pow (neg h) -1/2) (neg h) (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (/ (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (* (/ d l) (neg d)))) (sqrt (neg h))) (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (* (/ d l) (neg d)))) (* (/ h l) -1/2) (sqrt (/ d h)) (* (/ M d) D) (/ d (sqrt (neg l))) (sqrt (* (/ d l) (neg d))) (* D (/ M d)))
7.0ms	M	@	0	((* (* (+ (* (* (* (/ h l) -1/8) (* (/ M d) D)) (* (/ M d) D)) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* (* (/ h l) -1/8) (* (/ M d) D)) (* (/ M d) D)) 1) (sqrt (/ d l))) (* (* (/ h l) -1/8) (* (/ M d) D)) (* (/ h l) -1/8) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs (/ d (sqrt (* l h)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (sqrt (/ d h))) (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg (sqrt (/ d l))) (sqrt (/ d l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (pow (neg h) -1/2) (/ d (sqrt (neg l)))) (pow (neg h) -1/2) (neg h) (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (/ (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (* (/ d l) (neg d)))) (sqrt (neg h))) (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (* (/ d l) (neg d)))) (* (/ h l) -1/2) (sqrt (/ d h)) (* (/ M d) D) (/ d (sqrt (neg l))) (sqrt (* (/ d l) (neg d))) (* D (/ M d)))

simplify290.0ms (1.6%)

Memory

10.3MiB live, 288.5MiB allocated

Algorithm

1×	egg-herbie

Rules

9 034×	`lower-*.f64`
9 034×	`lower-*.f32`
6 024×	`lower-fma.f64`
6 024×	`lower-fma.f32`
3 404×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	297	16748
1	872	16357
2	3118	16280
3	6970	16199
0	8885	15818

Stop Event

1×	iter limit
1×	node limit

Counts

996 → 996

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 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 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ h l))
(* -1/8 (/ h l))
(* -1/8 (/ h l))
(* -1/8 (/ 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)
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(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)
(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)))))))
(* 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)) (sqrt -1))
(* (sqrt (/ 1 h)) (sqrt -1))
(* (sqrt (/ 1 h)) (sqrt -1))
(* (sqrt (/ 1 h)) (sqrt -1))
(* -1 h)
(* -1 h)
(* -1 h)
(* -1 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))))
(* 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))))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(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))))))
(* -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 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ h l))
(* -1/8 (/ h l))
(* -1/8 (/ h l))
(* -1/8 (/ 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))))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(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 (* (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)) 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)) (sqrt -1))
(* (sqrt (/ 1 h)) (sqrt -1))
(* (sqrt (/ 1 h)) (sqrt -1))
(* (sqrt (/ 1 h)) (sqrt -1))
(* -1 h)
(* -1 h)
(* -1 h)
(* -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) (* 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/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d 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) 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 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ h l))
(* -1/8 (/ h l))
(* -1/8 (/ h l))
(* -1/8 (/ 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)))))))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -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 (* (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) (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))))
(* (sqrt (/ 1 h)) (sqrt -1))
(* (sqrt (/ 1 h)) (sqrt -1))
(* (sqrt (/ 1 h)) (sqrt -1))
(* (sqrt (/ 1 h)) (sqrt -1))
(* -1 h)
(* -1 h)
(* -1 h)
(* -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) (* 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/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ 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))
(* 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))
(+ (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 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* 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)))))
(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)))))))
(* 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)))))
(* (* 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))))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) 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) 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 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* 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 (* (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)) 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) (* 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)))))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) 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) 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 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* 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 (* (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)) 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) (* 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)))))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* -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 (* (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 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ h l))
(* -1/8 (/ h l))
(* -1/8 (/ h l))
(* -1/8 (/ 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))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(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 (* (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)))
(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))))
(* -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) (* 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/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 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))
(+ (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 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ h l))
(* -1/8 (/ h l))
(* -1/8 (/ h l))
(* -1/8 (/ 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)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(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)))))
(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)))
(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))))
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))))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 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 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 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ h l))
(* -1/8 (/ h l))
(* -1/8 (/ h l))
(* -1/8 (/ 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)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -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)))))
(* (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)))
(* (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))))
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))))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* -1/2 (/ h l))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 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))
(+ (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 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* 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)))))
(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)))))))
(* 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)))))
(* (* 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))))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) 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) 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 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* 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 (* (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)) 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) (* 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)))))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) 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) 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 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* 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 (* (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)) 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) (* 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)))))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) 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 (* (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 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* 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)
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -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 (* (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)))
(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) 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)
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(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 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* 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)))))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -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 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)))
(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))))
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 h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(* (* d (sqrt -1)) (sqrt (/ 1 l)))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* -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 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 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* D (* M h)) (* d l)))
(* -1/8 (/ (* 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)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(fabs (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -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 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 (* (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
(+ 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 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)))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* (/ d (sqrt -1)) (sqrt (/ 1 l)))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(* -1 (* (* d (sqrt -1)) (sqrt (/ 1 l))))
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)
(/ (* D M) d)

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

rewrite200.0ms (1.1%)

Memory

1.8MiB live, 264.0MiB allocated

Rules

4 816×	`lower-*.f32`
4 790×	`lower-*.f64`
4 638×	`lower-/.f32`
4 624×	`lower-/.f64`
2 818×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	73	344
0	112	325
1	331	317
2	2082	303
0	8412	294

Stop Event

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

Counts

25 → 1 135

Calls

Call 1

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

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>

eval708.0ms (4%)

Memory: -130.7MiB live, 714.4MiB allocated
Compiler: Compiled 59 751 to 4 365 computations (92.7% saved)

prune175.0ms (1%)

Memory

-40.8MiB live, 401.5MiB allocated

Pruning

69 alts after pruning (63 fresh and 6 done)

	Pruned	Kept	Total
New	2 335	31	2 366
Fresh	13	32	45
Picked	2	3	5
Done	1	3	4
Total	2 351	69	2 420

Accuracy

94.9%

Counts

2 420 → 69

Alt Table

Click to see full alt table

Status	Accuracy	Program
	29.8%	(fma.f64 (/.f64 h l) #s(approx (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	33.1%	(fma.f64 (/.f64 h l) #s(approx (* (* -1/2 (pow (* (/ 2 M) (/ d D)) -2)) (sqrt (* (/ (/ d l) h) d))) (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	37.9%	(fma.f64 h (/.f64 (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal -1/2 binary64))) l) (/.f64 d (sqrt.f64 (.f64 l h))))
	27.4%	(/.f64 (.f64 (fma.f64 (/.f64 h l) (.f64 (.f64 (.f64 D (/.f64 M d)) #s(literal -1/8 binary64)) (.f64 D (/.f64 M d))) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h)))
	26.1%	(/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 (*.f64 (neg.f64 d) d))) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (neg.f64 h)))
	27.9%	(/.f64 (.f64 (fma.f64 (.f64 h #s(literal 1 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) l) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h)))
	5.3%	(/.f64 (.f64 (sqrt.f64 d) #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l))))) (sqrt.f64 h))
	18.1%	(/.f64 (.f64 #s(approx (+ ( (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (/.f64 (.f64 (.f64 M M) h) l) (.f64 d d)) (.f64 d d))) (sqrt.f64 (*.f64 (/.f64 d l) (neg.f64 d)))) (sqrt.f64 (neg.f64 h)))
	5.3%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 h) (.f64 (sqrt.f64 d) #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))))))
	65.7%	(.f64 (.f64 (fma.f64 (/.f64 (.f64 (.f64 D M) (.f64 #s(literal -1/8 binary64) h)) (.f64 d l)) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	66.9%	(.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 M (/.f64 D d)) #s(literal 2 binary64))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	67.4%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (/.f64 (.f64 D M) d)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	33.4%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (/.f64 d h)))
	41.0%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 (/.f64 d h)))
	33.5%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (neg.f64 l) #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 d h)))
	42.6%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))
	67.7%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 M (/.f64 D d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	63.6%	(.f64 (.f64 (fma.f64 #s(approx (* (* (/ h l) -1/8) (* (/ M d) D)) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	66.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 d) h) (.f64 #s(literal 1/4 binary64) D)))))
	36.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/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))))))
	36.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (pow.f64 (neg.f64 l) #s(literal -1 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))))))
	40.1%	(.f64 (.f64 #s(approx (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (/.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))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	4.2%	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 d l)) (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))))) (sqrt.f64 (/.f64 d h)))
	4.1%	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (/.f64 (sqrt.f64 d) (neg.f64 (sqrt.f64 l)))) (sqrt.f64 (/.f64 d h)))
	4.2%	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 0 binary64) (/.f64 d l))))) (sqrt.f64 (/.f64 d h)))
	4.1%	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (*.f64 (sqrt.f64 d) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 l))))) (sqrt.f64 (/.f64 d h)))
	33.6%	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	5.1%	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))) (sqrt.f64 (/.f64 d h)))
	10.7%	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))) (sqrt.f64 (/.f64 d h)))
	4.1%	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (*.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))))) (sqrt.f64 (/.f64 d h)))
	5.1%	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (neg.f64 l) #s(literal -1/2 binary64))))) (sqrt.f64 (/.f64 d h)))
	4.8%	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))))
	5.3%	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))
	11.1%	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d))))
✓	11.1%	(.f64 #s(approx ( (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 d h)))
	23.1%	#s(approx (/ (* (+ (* (* (/ h l) -1/2) (* 1/4 (pow (* D (/ M d)) 2))) 1) (sqrt (* (/ d l) (neg d)))) (sqrt (neg h))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	60.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) d) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	55.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d)) (.f64 (/.f64 h l) (sqrt.f64 (/.f64 h l))) (.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	49.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 (fma.f64 (.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) D) (/.f64 D d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	53.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 (fma.f64 M (.f64 (.f64 #s(literal -1/8 binary64) M) (.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 D D) d))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	4.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 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h))))
	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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)))
	21.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (.f64 (.f64 (.f64 (pow.f64 l #s(literal -3/2 binary64)) (sqrt.f64 h)) (.f64 D D)) (.f64 #s(literal -1/8 binary64) (.f64 M M))) d))
	15.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
	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)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	17.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h))
	24.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
✓	27.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))))
	26.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
	26.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 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1/4 binary64)) #s(literal 2 binary64)) d))
✓	4.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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 d (sqrt.f64 (neg.f64 l)))))
	4.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 (pow.f64 (neg.f64 h) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (neg.f64 l)) d))))
	4.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 (pow.f64 (exp.f64 #s(literal -1/2 binary64)) (log.f64 (neg.f64 h))) (/.f64 d (sqrt.f64 (neg.f64 l)))))
	24.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 (.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) M) d) (/.f64 M (pow.f64 D #s(literal -2 binary64)))) (sqrt.f64 l)) (/.f64 (sqrt.f64 h) (fabs.f64 l))))
	26.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 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
	20.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 (.f64 D D) (sqrt.f64 h)) (.f64 d (pow.f64 l #s(literal 3/2 binary64))))))
	21.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (/.f64 (*.f64 D D) d) (fabs.f64 l)) (/.f64 (sqrt.f64 h) (sqrt.f64 l)))))
	23.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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (/.f64 (sqrt.f64 (/.f64 h l)) (fabs.f64 l)))))
	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 (sqrt.f64 (/.f64 (pow.f64 l #s(literal -1 binary64)) 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
	13.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 d (sqrt.f64 (*.f64 l h))) (sqrt.f64 (/.f64 (/.f64 d l) h)))) (sqrt.f64 (sqrt.f64 d))))
	60.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 (neg.f64 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) d) (.f64 (sqrt.f64 (/.f64 h l)) d))) (/.f64 #s(literal -1 binary64) h)))
✓	25.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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d))
	4.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 (exp.f64 (.f64 (log.f64 (neg.f64 h)) #s(literal -1/2 binary64))) (/.f64 d (sqrt.f64 (neg.f64 l)))))
	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 (exp.f64 (.f64 #s(approx (log (* l h)) (+.f64 (log.f64 (neg.f64 h)) (log.f64 (neg.f64 l)))) #s(literal -1/2 binary64))) d))
	28.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	20.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (/.f64 d (sqrt.f64 (neg.f64 l))) (sqrt.f64 (neg.f64 h)))))
	29.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (sqrt.f64 (.f64 l h))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (neg.f64 d))) (.f64 (neg.f64 (sqrt.f64 (.f64 l h))) (sqrt.f64 (*.f64 l h))))))
✓	37.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))

Compiler

Compiled 4 288 to 1 743 computations (59.4% saved)

regimes271.0ms (1.5%)

Memory

42.7MiB live, 347.7MiB allocated

Counts

127 → 4

Calls

Call 1

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

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

Calls

7 calls:

48.0ms	h
41.0ms	l
39.0ms	D
36.0ms	d
35.0ms	(*.f64 M D)

Results

Accuracy	Segments	Branch
83.2%	4	`d`
78.7%	2	`h`
82.8%	4	`l`
69.0%	1	`M`
69.0%	1	`D`
76.5%	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.0%	1	`(*.f64 M D)`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes48.0ms (0.3%)

Memory

-27.9MiB live, 62.6MiB allocated

Counts

124 → 4

Calls

Call 1

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

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

Calls

1 calls:

41.0ms

Results

Accuracy	Segments	Branch
83.2%	4	`d`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes85.0ms (0.5%)

Memory

-4.8MiB live, 112.5MiB allocated

Counts

118 → 3

Calls

Call 1

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

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)))) (fma.f64 (*.f64 (/.f64 (*.f64 (neg.f64 M) (*.f64 (/.f64 #s(literal 1/2 binary64) d) D)) l) (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D))) h #s(literal 1 binary64)))

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

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

Calls

2 calls:

39.0ms	d
36.0ms	l

Results

Accuracy	Segments	Branch
80.7%	3	`l`
81.0%	3	`d`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes112.0ms (0.6%)

Memory

3.4MiB live, 114.9MiB allocated

Counts

101 → 3

Calls

Call 1

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

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)))) (fma.f64 (*.f64 (/.f64 (*.f64 (neg.f64 M) (*.f64 (/.f64 #s(literal 1/2 binary64) d) D)) l) (*.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D))) h #s(literal 1 binary64)))

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

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

Calls

2 calls:

69.0ms	l
29.0ms	d

Results

Accuracy	Segments	Branch
80.7%	3	`l`
79.8%	3	`d`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes197.0ms (1.1%)

Memory

10.0MiB live, 129.0MiB allocated

Counts

99 → 4

Calls

Call 1

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

Outputs
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (neg.f64 l) #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 d h)))
(/.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 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))
(.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 (/.f64 d h)))

Calls

3 calls:

89.0ms	h
59.0ms	l
43.0ms	d

Results

Accuracy	Segments	Branch
78.6%	3	`d`
76.9%	2	`h`
81.0%	4	`l`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes95.0ms (0.5%)

Memory

-8.0MiB live, 111.2MiB allocated

Counts

95 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

46.0ms	l
37.0ms	d

Results

Accuracy	Segments	Branch
77.7%	3	`d`
78.6%	3	`l`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes84.0ms (0.5%)

Memory

20.8MiB live, 97.8MiB allocated

Counts

87 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

49.0ms	h
29.0ms	l

Results

Accuracy	Segments	Branch
76.0%	2	`h`
78.5%	3	`l`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes62.0ms (0.3%)

Memory

1.4MiB live, 45.9MiB allocated

Counts

51 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

45.0ms

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

Results

Accuracy	Segments	Branch
76.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))))`
77.7%	4	`l`

Compiler

Compiled 36 to 27 computations (25% saved)

regimes36.0ms (0.2%)

Memory

-13.7MiB live, 21.4MiB allocated

Counts

43 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

33.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
76.2%	2	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`

Compiler

Compiled 35 to 22 computations (37.1% saved)

regimes13.0ms (0.1%)

Memory

20.5MiB live, 20.5MiB allocated

Counts

42 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

11.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
76.1%	2	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`

Compiler

Compiled 35 to 22 computations (37.1% saved)

regimes73.0ms (0.4%)

Memory

-3.8MiB live, 71.8MiB allocated

Counts

41 → 4

Calls

Call 1

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

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

Calls

4 calls:

24.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))))
22.0ms	l
12.0ms	d
12.0ms	h

Results

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

Compiler

Compiled 38 to 37 computations (2.6% saved)

regimes13.0ms (0.1%)

Memory

21.6MiB live, 21.6MiB allocated

Counts

40 → 4

Calls

Call 1

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

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

Calls

1 calls:

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
77.3%	4	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`

Compiler

Compiled 35 to 22 computations (37.1% saved)

regimes131.0ms (0.7%)

Memory

-18.6MiB live, 108.5MiB allocated

Counts

36 → 4

Calls

Call 1

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

Calls

7 calls:

39.0ms	M
24.0ms	l
10.0ms	d
10.0ms	D
10.0ms	h

Results

Accuracy	Segments	Branch
50.8%	4	`h`
54.3%	4	`l`
49.6%	3	`d`
49.8%	3	`D`
50.4%	2	`M`
54.0%	4	`(*.f64 M D)`
61.3%	4	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes19.0ms (0.1%)

Memory

-21.6MiB live, 16.5MiB allocated

Counts

28 → 4

Calls

Call 1

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

Outputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))

Calls

1 calls:

17.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
55.6%	4	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`

Compiler

Compiled 35 to 22 computations (37.1% saved)

regimes6.0ms (0%)

Memory

9.1MiB live, 9.1MiB allocated

Counts

14 → 4

Calls

Call 1

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

Outputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (sqrt.f64 (/.f64 h 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))

Calls

1 calls:

5.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
54.4%	4	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`

Compiler

Compiled 35 to 22 computations (37.1% saved)

regimes40.0ms (0.2%)

Memory

2.6MiB live, 50.2MiB allocated

Counts

11 → 4

Calls

Call 1

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

Outputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (*.f64 (sqrt.f64 (/.f64 h 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))

Calls

7 calls:

15.0ms	M
4.0ms	h
4.0ms	D
4.0ms	d
4.0ms	l

Results

Accuracy	Segments	Branch
42.6%	2	`h`
43.6%	3	`d`
43.6%	4	`D`
41.1%	2	`M`
43.2%	3	`(*.f64 M D)`
43.8%	2	`l`
48.1%	4	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes5.0ms (0%)

Memory

6.1MiB live, 6.1MiB allocated

Counts

10 → 4

Calls

Call 1

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

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

Calls

1 calls:

4.0ms

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

Results

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

Compiler

Compiled 35 to 22 computations (37.1% saved)

regimes21.0ms (0.1%)

Memory

-25.8MiB live, 13.3MiB allocated

Counts

8 → 2

Calls

Call 1

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

2 calls:

17.0ms

3.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
43.8%	2	`l`
42.9%	2	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`

Compiler

Compiled 36 to 27 computations (25% saved)

regimes7.0ms (0%)

Memory

11.3MiB live, 11.3MiB allocated

Counts

7 → 2

Calls

Call 1

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

Calls

2 calls:

3.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
42.9%	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))))`
40.2%	2	`l`

Compiler

Compiled 36 to 27 computations (25% saved)

regimes5.0ms (0%)

Memory

7.8MiB live, 7.8MiB allocated

Counts

4 → 2

Calls

Call 1

Inputs
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))) d))

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

Calls

2 calls:

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

Results

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

Compiler

Compiled 36 to 27 computations (25% saved)

regimes4.0ms (0%)

Memory

7.5MiB live, 7.5MiB allocated

Counts

2 → 2

Calls

Call 1

Inputs

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

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

Outputs

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

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

Calls

2 calls:

2.0ms

(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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
37.8%	1	`d`
41.8%	2	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`

Compiler

Compiled 36 to 27 computations (25% saved)

regimes31.0ms (0.2%)

Memory

-16.8MiB live, 22.5MiB allocated

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

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

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

Calls

7 calls:

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

Results

Accuracy	Segments	Branch
27.0%	1	`h`
27.0%	1	`d`
27.0%	1	`l`
27.0%	1	`D`
27.0%	1	`M`
27.0%	1	`(*.f64 M D)`
27.0%	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 43 to 53 computations (-23.3% saved)

bsearch197.0ms (1.1%)

Memory

11.9MiB live, 168.6MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
34.0ms	4.516673384103969e-183	1.1314704999928049e-181
57.0ms	-1.7892247762117675e-171	-2.678691540186311e-175
61.0ms	-5.467266117442845e+120	-4.9727443299384714e+117

Samples

68.0ms	343×	0	invalid
57.0ms	368×	0	valid

Compiler

Compiled 1 585 to 1 245 computations (21.5% saved)

Precisions

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

ival-div: 47.0ms (47.4% of total)

ival-mult: 26.0ms (26.2% of total)

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

ival-pow2: 7.0ms (7.1% of total)

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

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

exact: 1.0ms (1% of total)

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

bsearch13.0ms (0.1%)

Memory

16.3MiB live, 16.3MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	4.516673384103969e-183	1.1314704999928049e-181
2.0ms	-1.7892247762117675e-171	-2.678691540186311e-175
8.0ms	-5.467266117442845e+120	-4.9727443299384714e+117

Samples

2.0ms	16×	0	valid
2.0ms	20×	0	invalid

Compiler

Compiled 1 553 to 1 229 computations (20.9% saved)

Precisions

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

ival-div: 1.0ms (28.1% of total)

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

ival-pow: 1.0ms (28.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)

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

bsearch53.0ms (0.3%)

Memory

-35.1MiB live, 51.4MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	4.516673384103969e-183	1.1314704999928049e-181
46.0ms	-1.7892247762117675e-171	-2.678691540186311e-175

Samples

23.0ms	96×	0	valid
12.0ms	104×	0	invalid

Compiler

Compiled 897 to 717 computations (20.1% saved)

Precisions

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

ival-div: 7.0ms (34.3% of total)

ival-mult: 6.0ms (29.4% of total)

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch161.0ms (0.9%)

Memory

11.4MiB live, 199.8MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
41.0ms	3.752757777537676e+170	3.429660303417084e+171
107.0ms	-5.611092677750282e-304	2.5507511734102505e-306

Samples

90.0ms	240×	0	valid
35.0ms	245×	0	invalid

Compiler

Compiled 980 to 741 computations (24.4% saved)

Precisions

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

ival-pow: 41.0ms (50.7% of total)

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

ival-mult: 15.0ms (18.5% of total)

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

ival-sub: 2.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)

bsearch132.0ms (0.7%)

Memory

25.5MiB live, 186.0MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	3.752757777537676e+170	3.429660303417084e+171
58.0ms	-4.3102551212205223e-302	-5.611092677750282e-304
62.0ms	-1.427070999530508e+164	-2.221199454127145e+163

Samples

62.0ms	208×	0	valid
42.0ms	246×	0	invalid

Compiler

Compiled 1 158 to 911 computations (21.3% saved)

Precisions

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

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

ival-div: 18.0ms (22.6% of total)

ival-pow: 13.0ms (16.3% of total)

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

ival-sub: 2.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)

bsearch6.0ms (0%)

Memory

-28.0MiB live, 9.1MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
3.0ms	3.752757777537676e+170	3.429660303417084e+171
2.0ms	-5.611092677750282e-304	2.5507511734102505e-306

Compiler

Compiled 935 to 687 computations (26.5% saved)

bsearch4.0ms (0%)

Memory

7.8MiB live, 7.8MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.752757777537676e+170	3.429660303417084e+171
2.0ms	-5.611092677750282e-304	2.5507511734102505e-306

Compiler

Compiled 926 to 678 computations (26.8% saved)

bsearch1.0ms (0%)

Memory

1.8MiB live, 1.8MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	4.22136790669193e+157	7.243395073384964e+160

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch1.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	4.22136790669193e+157	7.243395073384964e+160

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch1.0ms (0%)

Memory

1.4MiB live, 1.3MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	4.22136790669193e+157	7.243395073384964e+160

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch1.0ms (0%)

Memory

2.7MiB live, 2.7MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	4.22136790669193e+157	7.243395073384964e+160
0.0ms	8.027997199535463e-248	7.293649075337707e-247
0.0ms	-4.6230567751672655e-172	0.0

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch1.0ms (0%)

Memory

3.4MiB live, 3.4MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	4.22136790669193e+157	7.243395073384964e+160
0.0ms	8.027997199535463e-248	7.293649075337707e-247
0.0ms	-4.6230567751672655e-172	0.0

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch1.0ms (0%)

Memory

2.6MiB live, 2.6MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	4.22136790669193e+157	7.243395073384964e+160
0.0ms	8.027997199535463e-248	7.293649075337707e-247
0.0ms	-4.6230567751672655e-172	0.0

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch1.0ms (0%)

Memory

2.3MiB live, 2.3MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	4.22136790669193e+157	7.243395073384964e+160
0.0ms	8.027997199535463e-248	7.293649075337707e-247
0.0ms	-4.6230567751672655e-172	0.0

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch1.0ms (0%)

Memory

2.2MiB live, 2.2MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	5.682191770166239e+195	1.5660482906725918e+200
0.0ms	8.027997199535463e-248	7.293649075337707e-247
0.0ms	-4.6230567751672655e-172	0.0

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch1.0ms (0%)

Memory

2.8MiB live, 2.8MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	5.682191770166239e+195	1.5660482906725918e+200
0.0ms	8.027997199535463e-248	7.293649075337707e-247
0.0ms	-8.793792632436593e+51	-3.71426441864315e+21

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch1.0ms (0%)

Memory

2.7MiB live, 2.7MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	2.0978796903045623e+97	4.077951889681803e+98
0.0ms	1.4065150097890568e-200	7.556852056579334e-190
0.0ms	-8.793792632436593e+51	-3.71426441864315e+21

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch59.0ms (0.3%)

Memory

-2.3MiB live, 120.8MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
53.0ms	3.82663428695501e-246	4.2495683650982265e-243

Samples

23.0ms	145×	0	invalid
21.0ms	128×	0	valid

Compiler

Compiled 182 to 222 computations (-22% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch0.0ms (0%)

Memory

1.0MiB live, 1.0MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-8.793792632436593e+51	-3.71426441864315e+21

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch0.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-3.6999573478527026e-160	-4.6230567751672655e-172

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch0.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-3.6999573478527026e-160	-4.6230567751672655e-172

Compiler

Compiled 38 to 30 computations (21.1% saved)

simplify90.0ms (0.5%)

Memory

-59.0MiB live, 129.8MiB allocated

Algorithm

1×	egg-herbie

Rules

202×	`-commutative-binary64-.f64`
68×	`sub-neg-binary64-neg.f64-+.f64--.f64`
66×	`neg-sub0-binary64--.f64-neg.f64`
66×	`+-commutative-binary64-+.f64`
66×	`neg-mul-1-binary64-*.f64-neg.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	269	3617
1	368	3617
2	420	3617
3	472	3617
4	521	3617
5	564	3617
6	591	3617
7	601	3617
8	605	3617
9	606	3617

Stop Event

1×

saturated

Calls

Call 1

Inputs
(if (<=.f64 d #s(literal -13000000000000000797204606824048202744807223935966810009869102748554621862951429085952025851125867936586265801552560128 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)))) (fma.f64 (.f64 (/.f64 (.f64 (neg.f64 M) (.f64 (/.f64 #s(literal 1/2 binary64) d) D)) l) (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D))) h #s(literal 1 binary64))) (if (<=.f64 d #s(literal -2673305049388005/4455508415646675018204269146191690746966043464109921807206242693261010905477224010259680479802120507596330380442963288389344438204468201170168614570041224793214838549179946240315306828365824 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 (pow.f64 (neg.f64 l) #s(literal -1 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 1794024649898929/74751027079122046462216955587793573067050655862760405902609490213261724339546970300512875500623813013973275600053770769378323738155015176163371603062328757260320680744718580942157810765768356265984 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 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) d) (.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -13500000000000000052570065563425522272800558505965591045063703811504960623068718332560686821498074071535836046055964672 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)))) (fma.f64 (.f64 (/.f64 (.f64 (neg.f64 M) (.f64 (/.f64 #s(literal 1/2 binary64) d) D)) l) (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D))) h #s(literal 1 binary64))) (if (<=.f64 d #s(literal -2673305049388005/4455508415646675018204269146191690746966043464109921807206242693261010905477224010259680479802120507596330380442963288389344438204468201170168614570041224793214838549179946240315306828365824 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/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 1794024649898929/74751027079122046462216955587793573067050655862760405902609490213261724339546970300512875500623813013973275600053770769378323738155015176163371603062328757260320680744718580942157810765768356265984 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 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) d) (.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -1086030176313877/139234637988958594318883410818490335842688858253435056475195084164406590796163250320615014993816265862385324388842602762167013693889631286567769205313788274787963704661873320009853338386432 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)))) (fma.f64 (.f64 (/.f64 (.f64 (neg.f64 M) (.f64 (/.f64 #s(literal 1/2 binary64) d) D)) l) (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D))) h #s(literal 1 binary64))) (if (<=.f64 d #s(literal 1794024649898929/74751027079122046462216955587793573067050655862760405902609490213261724339546970300512875500623813013973275600053770769378323738155015176163371603062328757260320680744718580942157810765768356265984 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 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) d) (.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal -2024022533073/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 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)))) (fma.f64 (.f64 (/.f64 (.f64 (neg.f64 M) (.f64 (/.f64 #s(literal 1/2 binary64) d) D)) l) (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D))) h #s(literal 1 binary64))) (if (<=.f64 l #s(literal 2600000000000000009042693624556794706416408038497784669361839915997332280687048974070614730742083649469680867212412429651832475632518199788204010075328388682339662583300096 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 (/.f64 d h)))))
(if (<=.f64 l #s(literal -28499999999999999027890908567211339027528857871061161854849296026029161598091584235141546801335225987443011803477929687506396389256491967303926986637795253345583104 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (neg.f64 l) #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal -1760395574724839/3088413288990945714607167766096760666649729152895234960279866913260350640380788374205938472006792060778611417607373228628384532735989280347702230834056678923362997806954442769843550227998248540363155634742320939156524772391123850992097524347673943425610505012700786888921103128284156837954503288400970554554866145951744 binary64)) (/.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))) (if (<=.f64 l #s(literal 2600000000000000009042693624556794706416408038497784669361839915997332280687048974070614730742083649469680867212412429651832475632518199788204010075328388682339662583300096 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 (/.f64 d h))))))
(if (<=.f64 l #s(literal -2024022533073/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (neg.f64 l) #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal 2600000000000000009042693624556794706416408038497784669361839915997332280687048974070614730742083649469680867212412429651832475632518199788204010075328388682339662583300096 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 (/.f64 d h)))))
(if (<=.f64 l #s(literal -2024022533073/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal 2600000000000000009042693624556794706416408038497784669361839915997332280687048974070614730742083649469680867212412429651832475632518199788204010075328388682339662583300096 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 (/.f64 d h)))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (/.f64 (.f64 D M) d)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 M (/.f64 D d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -3480865949723965/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 binary64)) (.f64 (.f64 (fma.f64 (/.f64 (.f64 (.f64 D M) (.f64 #s(literal -1/8 binary64) h)) (.f64 d l)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/8) (* (/ M d) D)) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -3480865949723965/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 binary64)) (.f64 (.f64 (fma.f64 (/.f64 (.f64 (.f64 D M) (.f64 #s(literal -1/8 binary64) h)) (.f64 d l)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -3480865949723965/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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) (/.f64 (sqrt.f64 (/.f64 h l)) (fabs.f64 l))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -3480865949723965/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h)) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -3480865949723965/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h)) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 9999999999999999511432924639235132053389160461186216699466583890573511723749959183278387889172340228095875448767138256706948253250552493092635735926276453993770366538373425000777236538229086224384 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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (.f64 (sqrt.f64 (/.f64 h 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -4999999999999999966104743371808139882308542209720320 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))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 9999999999999999511432924639235132053389160461186216699466583890573511723749959183278387889172340228095875448767138256706948253250552493092635735926276453993770366538373425000777236538229086224384 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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (.f64 (sqrt.f64 (/.f64 h 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -4999999999999999966104743371808139882308542209720320 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))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 1723641332219371/86182066610968551542636378241108028056376767329454880514019834315878107616003372189510312530372009184902888961739623919010110377987011442493486117202360415845666384627768436296772219009176743399772868636439042064384 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 40000000000000002943034953908449993590304248608709827196983431605407036575208760808202718624612352 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 (/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 l #s(literal 5535142007541129/123003155723136208567847447683223664415731869180715065944930703618254955521953492303010368693540149343822709050322214299552689203876695953600699775494388206142090885899729347827083318884583758435450548517566916626912548274908112766882031433928533568160966639616 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -4999999999999999966104743371808139882308542209720320 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1582914569427869/7914572847139345089936080672628710081124203171238778877250017794972711203409019749450124833959777439667125485632516458859243681097816038718961476963260581373331416708758372352 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1582914569427869/7914572847139345089936080672628710081124203171238778877250017794972711203409019749450124833959777439667125485632516458859243681097816038718961476963260581373331416708758372352 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))

Outputs
(if (<=.f64 d #s(literal -13000000000000000797204606824048202744807223935966810009869102748554621862951429085952025851125867936586265801552560128 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)))) (fma.f64 (.f64 (/.f64 (.f64 (neg.f64 M) (.f64 (/.f64 #s(literal 1/2 binary64) d) D)) l) (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D))) h #s(literal 1 binary64))) (if (<=.f64 d #s(literal -2673305049388005/4455508415646675018204269146191690746966043464109921807206242693261010905477224010259680479802120507596330380442963288389344438204468201170168614570041224793214838549179946240315306828365824 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 (pow.f64 (neg.f64 l) #s(literal -1 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 1794024649898929/74751027079122046462216955587793573067050655862760405902609490213261724339546970300512875500623813013973275600053770769378323738155015176163371603062328757260320680744718580942157810765768356265984 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 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) d) (.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -13000000000000000797204606824048202744807223935966810009869102748554621862951429085952025851125867936586265801552560128 binary64)) (.f64 (fma.f64 (.f64 (.f64 (.f64 (neg.f64 D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 (.f64 D (/.f64 #s(literal 1/2 binary64) d)) M) l)) h #s(literal 1 binary64)) (.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 -2673305049388005/4455508415646675018204269146191690746966043464109921807206242693261010905477224010259680479802120507596330380442963288389344438204468201170168614570041224793214838549179946240315306828365824 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (/.f64 (.f64 (.f64 D (/.f64 #s(literal 1/2 binary64) d)) M) l))) (.f64 (.f64 (sqrt.f64 (pow.f64 (neg.f64 l) #s(literal -1 binary64))) (sqrt.f64 (neg.f64 d))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) (if (<=.f64 d #s(literal 1794024649898929/74751027079122046462216955587793573067050655862760405902609490213261724339546970300512875500623813013973275600053770769378323738155015176163371603062328757260320680744718580942157810765768356265984 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 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) #s(literal -1/8 binary64)) d) (.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 (.f64 (/.f64 M d) D) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)))))))
(if (<=.f64 d #s(literal -13500000000000000052570065563425522272800558505965591045063703811504960623068718332560686821498074071535836046055964672 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)))) (fma.f64 (.f64 (/.f64 (.f64 (neg.f64 M) (.f64 (/.f64 #s(literal 1/2 binary64) d) D)) l) (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D))) h #s(literal 1 binary64))) (if (<=.f64 d #s(literal -2673305049388005/4455508415646675018204269146191690746966043464109921807206242693261010905477224010259680479802120507596330380442963288389344438204468201170168614570041224793214838549179946240315306828365824 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/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 1794024649898929/74751027079122046462216955587793573067050655862760405902609490213261724339546970300512875500623813013973275600053770769378323738155015176163371603062328757260320680744718580942157810765768356265984 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 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) d) (.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -13500000000000000052570065563425522272800558505965591045063703811504960623068718332560686821498074071535836046055964672 binary64)) (.f64 (fma.f64 (.f64 (.f64 (.f64 (neg.f64 D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 (.f64 D (/.f64 #s(literal 1/2 binary64) d)) M) l)) h #s(literal 1 binary64)) (.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 -2673305049388005/4455508415646675018204269146191690746966043464109921807206242693261010905477224010259680479802120507596330380442963288389344438204468201170168614570041224793214838549179946240315306828365824 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (/.f64 (.f64 (.f64 D (/.f64 #s(literal 1/2 binary64) d)) M) l)))) (if (<=.f64 d #s(literal 1794024649898929/74751027079122046462216955587793573067050655862760405902609490213261724339546970300512875500623813013973275600053770769378323738155015176163371603062328757260320680744718580942157810765768356265984 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 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) #s(literal -1/8 binary64)) d) (.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 (.f64 (/.f64 M d) D) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)))))))
(if (<=.f64 d #s(literal -1086030176313877/139234637988958594318883410818490335842688858253435056475195084164406590796163250320615014993816265862385324388842602762167013693889631286567769205313788274787963704661873320009853338386432 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)))) (fma.f64 (.f64 (/.f64 (.f64 (neg.f64 M) (.f64 (/.f64 #s(literal 1/2 binary64) d) D)) l) (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D))) h #s(literal 1 binary64))) (if (<=.f64 d #s(literal 1794024649898929/74751027079122046462216955587793573067050655862760405902609490213261724339546970300512875500623813013973275600053770769378323738155015176163371603062328757260320680744718580942157810765768356265984 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 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) d) (.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal -1086030176313877/139234637988958594318883410818490335842688858253435056475195084164406590796163250320615014993816265862385324388842602762167013693889631286567769205313788274787963704661873320009853338386432 binary64)) (.f64 (fma.f64 (.f64 (.f64 (.f64 (neg.f64 D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 (.f64 D (/.f64 #s(literal 1/2 binary64) d)) M) l)) h #s(literal 1 binary64)) (.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 1794024649898929/74751027079122046462216955587793573067050655862760405902609490213261724339546970300512875500623813013973275600053770769378323738155015176163371603062328757260320680744718580942157810765768356265984 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 (fma.f64 (pow.f64 (/.f64 h l) #s(literal 3/2 binary64)) (/.f64 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) #s(literal -1/8 binary64)) d) (.f64 (sqrt.f64 (/.f64 h l)) d)) h)) (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 (.f64 (/.f64 M d) D) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (*.f64 (/.f64 M d) D) #s(literal 1 binary64))))))
(if (<=.f64 l #s(literal -2024022533073/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 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)))) (fma.f64 (.f64 (/.f64 (.f64 (neg.f64 M) (.f64 (/.f64 #s(literal 1/2 binary64) d) D)) l) (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D))) h #s(literal 1 binary64))) (if (<=.f64 l #s(literal 2600000000000000009042693624556794706416408038497784669361839915997332280687048974070614730742083649469680867212412429651832475632518199788204010075328388682339662583300096 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 (/.f64 d h)))))
(if (<=.f64 l #s(literal -2024022533073/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (fma.f64 (.f64 (.f64 (.f64 (neg.f64 D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 (.f64 D (/.f64 #s(literal 1/2 binary64) d)) M) l)) h #s(literal 1 binary64)) (.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 l #s(literal 2600000000000000009042693624556794706416408038497784669361839915997332280687048974070614730742083649469680867212412429651832475632518199788204010075328388682339662583300096 binary64)) (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 (.f64 (/.f64 M d) D) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (.f64 (/.f64 M d) D) #s(literal 1 binary64)))) (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 l)) (fma.f64 (.f64 (.f64 (/.f64 M d) D) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (*.f64 (/.f64 M d) D) #s(literal 1 binary64))))))
(if (<=.f64 l #s(literal -28499999999999999027890908567211339027528857871061161854849296026029161598091584235141546801335225987443011803477929687506396389256491967303926986637795253345583104 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (neg.f64 l) #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal -1760395574724839/3088413288990945714607167766096760666649729152895234960279866913260350640380788374205938472006792060778611417607373228628384532735989280347702230834056678923362997806954442769843550227998248540363155634742320939156524772391123850992097524347673943425610505012700786888921103128284156837954503288400970554554866145951744 binary64)) (/.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))) (if (<=.f64 l #s(literal 2600000000000000009042693624556794706416408038497784669361839915997332280687048974070614730742083649469680867212412429651832475632518199788204010075328388682339662583300096 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 (/.f64 d h))))))
(if (<=.f64 l #s(literal -28499999999999999027890908567211339027528857871061161854849296026029161598091584235141546801335225987443011803477929687506396389256491967303926986637795253345583104 binary64)) (.f64 (.f64 (.f64 (pow.f64 (neg.f64 l) #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 d))) (fma.f64 (.f64 (.f64 (/.f64 M d) D) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (.f64 (/.f64 M d) D) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal -1760395574724839/3088413288990945714607167766096760666649729152895234960279866913260350640380788374205938472006792060778611417607373228628384532735989280347702230834056678923362997806954442769843550227998248540363155634742320939156524772391123850992097524347673943425610505012700786888921103128284156837954503288400970554554866145951744 binary64)) (/.f64 (.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 d D) (/.f64 #s(literal 2 binary64) M)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (neg.f64 d))) (sqrt.f64 (neg.f64 h))) (if (<=.f64 l #s(literal 2600000000000000009042693624556794706416408038497784669361839915997332280687048974070614730742083649469680867212412429651832475632518199788204010075328388682339662583300096 binary64)) (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 (.f64 (/.f64 M d) D) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (.f64 (/.f64 M d) D) #s(literal 1 binary64)))) (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 l)) (fma.f64 (.f64 (.f64 (/.f64 M d) D) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)))))))
(if (<=.f64 l #s(literal -2024022533073/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (.f64 (sqrt.f64 (neg.f64 d)) (pow.f64 (neg.f64 l) #s(literal -1/2 binary64)))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal 2600000000000000009042693624556794706416408038497784669361839915997332280687048974070614730742083649469680867212412429651832475632518199788204010075328388682339662583300096 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (*.f64 (/.f64 M d) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 (/.f64 d h)))))
(if (<=.f64 l #s(literal -2024022533073/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (.f64 (pow.f64 (neg.f64 l) #s(literal -1/2 binary64)) (sqrt.f64 (neg.f64 d))) (fma.f64 (.f64 (.f64 (/.f64 M d) D) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (.f64 (/.f64 M d) D) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal 2600000000000000009042693624556794706416408038497784669361839915997332280687048974070614730742083649469680867212412429651832475632518199788204010075328388682339662583300096 binary64)) (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 (.f64 (/.f64 M d) D) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (.f64 (/.f64 M d) D) #s(literal 1 binary64)))) (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 l)) (fma.f64 (.f64 (.f64 (/.f64 M d) D) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (*.f64 (/.f64 M d) D) #s(literal 1 binary64))))))
(if (<=.f64 l #s(literal -2024022533073/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal 2600000000000000009042693624556794706416408038497784669361839915997332280687048974070614730742083649469680867212412429651832475632518199788204010075328388682339662583300096 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 (/.f64 d h)))))
(if (<=.f64 l #s(literal -2024022533073/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (fma.f64 (.f64 (.f64 (/.f64 M d) D) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (.f64 (/.f64 M d) D) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 l #s(literal 2600000000000000009042693624556794706416408038497784669361839915997332280687048974070614730742083649469680867212412429651832475632518199788204010075328388682339662583300096 binary64)) (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 (.f64 (/.f64 M d) D) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (.f64 (/.f64 M d) D) #s(literal 1 binary64)))) (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 l)) (fma.f64 (.f64 (.f64 (/.f64 M d) D) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (.f64 (/.f64 M d) D) #s(literal 1 binary64))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (/.f64 (.f64 D M) d)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) (.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 D M) d) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 (.f64 (/.f64 M d) D) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (.f64 (/.f64 M d) 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/8 binary64)) (.f64 (/.f64 M d) D)) (.f64 M (/.f64 D d)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (/.f64 M d) D) (.f64 #s(literal -1/8 binary64) (/.f64 h l))) (.f64 (/.f64 D d) M) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -3480865949723965/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 binary64)) (.f64 (.f64 (fma.f64 (/.f64 (.f64 (.f64 D M) (.f64 #s(literal -1/8 binary64) h)) (.f64 d l)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/8) (* (/ M d) D)) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M D)) l) (/.f64 h d))) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal -3480865949723965/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 binary64)) (.f64 (.f64 (fma.f64 (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) h) (.f64 D M)) (.f64 l d)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) (.f64 (.f64 (fma.f64 #s(approx ( (* (/ h l) -1/8) (* (/ M d) D)) (.f64 (/.f64 h d) (/.f64 (.f64 (.f64 D M) #s(literal -1/8 binary64)) l))) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -3480865949723965/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 binary64)) (.f64 (.f64 (fma.f64 (/.f64 (.f64 (.f64 D M) (.f64 #s(literal -1/8 binary64) h)) (.f64 d l)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal -3480865949723965/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 binary64)) (.f64 (.f64 (fma.f64 (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) h) (.f64 D M)) (.f64 l d)) (.f64 (/.f64 M d) D) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h))) (if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 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 h)) (sqrt.f64 (/.f64 d l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -3480865949723965/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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) (/.f64 (sqrt.f64 (/.f64 h l)) (fabs.f64 l))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal -3480865949723965/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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 (sqrt.f64 (/.f64 h l)) (fabs.f64 l)) (/.f64 (.f64 D D) d)) (.f64 (.f64 M M) #s(literal -1/8 binary64)))) (if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 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 h)) (sqrt.f64 (/.f64 d l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -3480865949723965/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h)) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal -3480865949723965/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (.f64 (sqrt.f64 (/.f64 h l)) (neg.f64 d))) h)) (if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 49999999999999997643667726825605503998723091390929041589542693874892976119602893534497849501708255388193655030747466210492481655783901101005318643863821221888 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 h)) (sqrt.f64 (/.f64 d l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -3480865949723965/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 h l)))) h)) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 9999999999999999511432924639235132053389160461186216699466583890573511723749959183278387889172340228095875448767138256706948253250552493092635735926276453993770366538373425000777236538229086224384 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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (.f64 (sqrt.f64 (/.f64 h 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal -3480865949723965/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (.f64 (sqrt.f64 (/.f64 h l)) (neg.f64 d))) h)) (if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 9999999999999999511432924639235132053389160461186216699466583890573511723749959183278387889172340228095875448767138256706948253250552493092635735926276453993770366538373425000777236538229086224384 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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (.f64 (sqrt.f64 (/.f64 h 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -4999999999999999966104743371808139882308542209720320 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))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 9999999999999999511432924639235132053389160461186216699466583890573511723749959183278387889172340228095875448767138256706948253250552493092635735926276453993770366538373425000777236538229086224384 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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (.f64 (sqrt.f64 (/.f64 h 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal -4999999999999999966104743371808139882308542209720320 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))) (if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 3148880786512287/31488807865122869393368946606905258090427358510263056881902260126273268613620094029570654385546278232018613516882486860685488436192434164121779142526563380772375266790330713043733329634453442159475340420497130656489612358376476868321800047085704593449207459741696 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 9999999999999999511432924639235132053389160461186216699466583890573511723749959183278387889172340228095875448767138256706948253250552493092635735926276453993770366538373425000777236538229086224384 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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (pow (/ h l) 3))) (* (sqrt (/ h l)) d)) (.f64 (sqrt.f64 (/.f64 h 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -4999999999999999966104743371808139882308542209720320 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))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 1723641332219371/86182066610968551542636378241108028056376767329454880514019834315878107616003372189510312530372009184902888961739623919010110377987011442493486117202360415845666384627768436296772219009176743399772868636439042064384 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal 40000000000000002943034953908449993590304248608709827196983431605407036575208760808202718624612352 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 (/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal -4999999999999999966104743371808139882308542209720320 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))) (if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 1723641332219371/86182066610968551542636378241108028056376767329454880514019834315878107616003372189510312530372009184902888961739623919010110377987011442493486117202360415845666384627768436296772219009176743399772868636439042064384 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (.f64 l h))))) (if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal 40000000000000002943034953908449993590304248608709827196983431605407036575208760808202718624612352 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 (/.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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))))
(if (<=.f64 l #s(literal 5535142007541129/123003155723136208567847447683223664415731869180715065944930703618254955521953492303010368693540149343822709050322214299552689203876695953600699775494388206142090885899729347827083318884583758435450548517566916626912548274908112766882031433928533568160966639616 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 5535142007541129/123003155723136208567847447683223664415731869180715065944930703618254955521953492303010368693540149343822709050322214299552689203876695953600699775494388206142090885899729347827083318884583758435450548517566916626912548274908112766882031433928533568160966639616 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 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -4999999999999999966104743371808139882308542209720320 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal -4999999999999999966104743371808139882308542209720320 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)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1582914569427869/7914572847139345089936080672628710081124203171238778877250017794972711203409019749450124833959777439667125485632516458859243681097816038718961476963260581373331416708758372352 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal -1582914569427869/7914572847139345089936080672628710081124203171238778877250017794972711203409019749450124833959777439667125485632516458859243681097816038718961476963260581373331416708758372352 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -1582914569427869/7914572847139345089936080672628710081124203171238778877250017794972711203409019749450124833959777439667125485632516458859243681097816038718961476963260581373331416708758372352 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
(if (<=.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #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))))) #s(literal -1582914569427869/7914572847139345089936080672628710081124203171238778877250017794972711203409019749450124833959777439667125485632516458859243681097816038718961476963260581373331416708758372352 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (fabs.f64 (/.f64 d (sqrt.f64 (*.f64 l h))))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))

soundness2.3s (13%)

Memory

34.7MiB live, 1 582.6MiB allocated

Rules

9 034×	`lower-*.f64`
9 034×	`lower-*.f32`
8 078×	`lower-*.f64`
8 078×	`lower-*.f32`
7 446×	`lower-*.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	221	17517
1	656	16920
2	2333	16779
3	5288	16552
0	8791	16234
0	297	16748
1	872	16357
2	3118	16280
3	6970	16199
0	8885	15818
0	73	344
0	112	325
1	331	317
2	2082	303
0	8412	294
0	147	3819
1	413	3735
2	1498	3698
3	4176	3682
4	7950	3682
0	8172	3598
0	89	397
0	152	383
1	458	352
2	3211	332
0	11083	326
0	67	352
0	104	326
1	315	318
2	1846	306
0	8225	299
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×	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

Compiler

Compiled 6 619 to 2 229 computations (66.3% saved)

preprocess169.0ms (0.9%)

Memory

-1.2MiB live, 468.4MiB allocated

Remove

(sort M D)

(abs M)

(abs D)

Compiler

Compiled 5 632 to 976 computations (82.7% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated