Metrics for Henrywood and Agarwal, Equation (12)

start0.0ms (0%)

Memory: 0.2MiB live, 0.2MiB allocated

analyze432.0ms (2.5%)

Memory

1.9MiB live, 721.2MiB allocated

Algorithm

1×

Search

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

Compiler

Compiled 37 to 24 computations (35.1% saved)

sample6.1s (35.1%)

Memory

-0.7MiB live, 7 181.3MiB allocated

Samples

2.5s	13 027×	0	invalid
2.1s	8 256×	0	valid

Precisions

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

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

ival-mult: 1.1s (32% of total)

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

ival-pow2: 314.0ms (8.9% of total)

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

exact: 22.0ms (0.6% of total)

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

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

Bogosity

explain321.0ms (1.8%)

Memory

2.2MiB live, 665.3MiB allocated

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
67	0	-	3	(-4.045196252410655e-27 -6.482238843299732e-295 -2.692744952604434e+294 2.30233800145356e-62 7.119197685793924e+168)	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
62	0	-	3	(-1.7157614186273792e-76 -5.409031826371818e+244 -0.0009122531308792894 -4.6501681208505896e+45 -8.524519170674285e-134)	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
40	1	(-4.045196252410655e-27 -6.482238843299732e-295 -2.692744952604434e+294 2.30233800145356e-62 7.119197685793924e+168)	1	(-8.826601315500549e-32 -8.327920047910612e+129 -4.402908812732509e+65 -5.520457566968415e+78 1.7227221145606457e-267)	`(.f64 (.f64 (/.f64 #s(literal 1 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	0	-	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))))`
19	0	-	0	-	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`
0	0	-	0	-	`D`
0	0	-	0	-	`(*.f64 #s(literal 2 binary64) d)`
0	0	-	0	-	`(/.f64 h l)`
0	0	-	0	-	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`
0	0	-	0	-	`d`
0	0	-	0	-	`#s(literal 1 binary64)`
0	0	-	0	-	`(/.f64 d l)`
0	0	-	0	-	`(*.f64 M D)`
0	0	-	0	-	`(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))`
0	0	-	0	-	`(/.f64 d h)`
0	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	-	0	-	`#s(literal 2 binary64)`
0	0	-	0	-	`l`
0	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	-	0	-	`M`
0	0	-	0	-	`h`
0	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	34	0
↳	`(/.f64 d l)`	underflow	34
`pow.f64`	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	uflow-rescue	31	0
↳	`(/.f64 d h)`	underflow	31
`pow.f64`	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	30	0
↳	`(/.f64 d l)`	overflow	30
`pow.f64`	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	28	0
↳	`(/.f64 d h)`	overflow	28
`*.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**	19	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**	14	0
↳	`(/.f64 d h)`	underflow	31
↳	`(/.f64 d l)`	underflow	34
↳	`(*.f64 (pow.f64 (/.f64 d 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	22
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	76
↳	`(.f64 (/.f64 #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	76
↳	`(/.f64 h l)`	overflow	32
↳	`(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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	78
↳	`(.f64 (.f64 (/.f64 #s(literal 1 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	78
↳	`(*.f64 M D)`	overflow	24
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	40
`*.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**	6	0
`/.f64`	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	o/n	6	0
↳	`(*.f64 M D)`	overflow	24
`*.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**	5	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**	3	0
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	76
↳	`(.f64 (/.f64 #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	76
↳	`(*.f64 M D)`	overflow	24
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	40
↳	`(/.f64 h l)`	underflow	27
`/.f64`	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	u/n	1	0
↳	`(*.f64 M D)`	underflow	31

Confusion

	Predicted +	Predicted -
+	80	5
-	37	134

Precision

0.6837606837606838

Recall

0.9411764705882353

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	80	0	5
-	37	0	134

Precision?

0.6837606837606838

Recall?

0.9411764705882353

Freqs

test

number	freq
0	139
1	75
2	26
3	14
4	2

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

98.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-div: 21.0ms (29.7% of total)

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

ival-mult: 19.0ms (26.9% of total)

ival-pow2: 6.0ms (8.5% 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)

preprocess179.0ms (1%)

Memory

17.4MiB live, 211.2MiB 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.4MiB live, 0.4MiB allocated
Compiler: Compiled 0 to 5 computations (-∞% saved)

prune1.0ms (0%)

Memory

1.5MiB live, 1.5MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	68.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))))

Status

Accuracy

Program

▶

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

simplify120.0ms (0.7%)

Memory

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

localize81.0ms (0.5%)

Memory

-3.8MiB live, 116.3MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	6.104982393541176	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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	9.281998783181555	(.f64 (.f64 (/.f64 #s(literal 1 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	14.316040841263849	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	15.661752295912652	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

46.0ms

256×

valid

Compiler

Compiled 156 to 24 computations (84.6% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

series68.0ms (0.4%)

Memory

7.1MiB live, 78.4MiB 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
8.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)))))
6.0ms	l	@	-inf	((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))))
5.0ms	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)))))
4.0ms	d	@	-inf	((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))))

simplify133.0ms (0.8%)

Memory

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

rewrite157.0ms (0.9%)

Memory

28.7MiB live, 208.4MiB 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>

eval136.0ms (0.8%)

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

prune51.0ms (0.3%)

Memory

7.7MiB live, 120.0MiB allocated

Pruning

27 alts after pruning (27 fresh and 0 done)

	Pruned	Kept	Total
New	657	27	684
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	658	27	685

Accuracy

90.9%

Counts

685 → 27

Alt Table

Click to see full alt table

Status	Accuracy	Program
	43.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)))
	67.5%	(/.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
	33.1%	(/.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)))
▶	44.3%	(/.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))
	31.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)))
	41.3%	(/.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))
	56.5%	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	68.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 l))) (sqrt.f64 (/.f64 d h)))
	68.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 d l)))
	68.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)))) (fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (.f64 (.f64 (/.f64 D d) #s(literal 1/2 binary64)) (.f64 M (/.f64 h l))) #s(literal 1 binary64)))
	64.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 (pow.f64 (.f64 D M) #s(literal 2 binary64)) #s(literal 1/4 binary64)) d) (.f64 (/.f64 h l) #s(literal 1/2 binary64))) d)))
	60.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 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 D M)) (/.f64 (.f64 #s(literal 4 binary64) (.f64 d d)) (.f64 D M)))))
▶	70.7%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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))))))
	64.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 D #s(literal 1/2 binary64)) (.f64 (/.f64 M d) M)) (.f64 (.f64 (/.f64 D d) #s(literal 1/2 binary64)) (*.f64 (/.f64 h l) #s(literal 1/2 binary64))))))
	26.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)))) #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))))
▶	68.2%	(.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))))
	67.4%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	41.2%	(.f64 (sqrt.f64 d) (.f64 (pow.f64 l #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 h)))))
	44.8%	(.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)))))
	43.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 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
▶	17.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 (.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.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 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))
	26.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (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))
	17.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 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
	12.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 #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.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 #s(literal 1 binary64) (.f64 l h))) 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 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))

Compiler

Compiled 1 540 to 1 194 computations (22.5% saved)

simplify138.0ms (0.8%)

Memory

-7.4MiB live, 229.9MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

7 626×	`lower-*.f32`
7 576×	`lower-*.f64`
3 024×	`lower-/.f32`
2 994×	`lower-/.f64`
2 220×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	88	689
0	150	676
1	253	664
2	605	656
3	3057	656
4	7439	656
0	8266	650

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

localize232.0ms (1.3%)

Memory

-32.6MiB live, 398.2MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	2.933733618227872	(.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))))
accuracy	5.432631901872805	(.f64 (.f64 (/.f64 #s(literal 1 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.719338958865941	(sqrt.f64 (/.f64 d l))
accuracy	7.895451219520499	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	1.0778736186605433	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.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))
accuracy	1.4321024996847218	(*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))
accuracy	4.332805862120288	(fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h l)) (pow.f64 (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D)) #s(literal -2 binary64)) #s(literal 1 binary64))
accuracy	7.719338958865941	(sqrt.f64 (/.f64 d l))
accuracy	7.216782755257694	(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) d))
accuracy	8.455766866124213	(sqrt.f64 (*.f64 l h))
accuracy	12.230202106162883	(sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h))
accuracy	13.70116207517525	(/.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))
accuracy	0.08984375	(/.f64 #s(literal 1 binary64) (*.f64 l h))
accuracy	0.1328125	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
accuracy	8.543140397813819	(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
accuracy	17.997951449818135	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 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.933733618227872	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 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	3.8765180248947675	(/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l)
accuracy	7.715432708865941	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	7.895451219520499	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

84.0ms	142×	0	valid
78.0ms	114×	0	invalid

Compiler

Compiled 701 to 76 computations (89.2% saved)

Precisions

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

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

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

ival-pow: 22.0ms (19.8% of total)

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

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

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

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

exact: 1.0ms (0.9% of total)

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

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

series206.0ms (1.2%)

Memory

16.0MiB live, 287.0MiB allocated

Counts

26 → 1 116

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

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

Calls

15 calls:

Time	Variable		Point	Expression
27.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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* l l)) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* (* (* M M) -1/8) (/ (* D D) d)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (sqrt h)) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (* (* (/ 1/2 d) D) M) 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 (/ (pow l 3) h)) (sqrt (* l h)) (sqrt (/ d l)) (* (/ 2 M) (/ d D)) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))
14.0ms	h	@	-inf	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (* (* (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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* l l)) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* (* (* M M) -1/8) (/ (* D D) d)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (sqrt h)) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (* (* (/ 1/2 d) D) M) 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 (/ (pow l 3) h)) (sqrt (* l h)) (sqrt (/ d l)) (* (/ 2 M) (/ d D)) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))
11.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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* l l)) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* (* (* M M) -1/8) (/ (* D D) d)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (sqrt h)) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (* (* (/ 1/2 d) D) M) 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 (/ (pow l 3) h)) (sqrt (* l h)) (sqrt (/ d l)) (* (/ 2 M) (/ d D)) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))
10.0ms	d	@	0	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (* (* (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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* l l)) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* (* (* M M) -1/8) (/ (* D D) d)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (sqrt h)) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (* (* (/ 1/2 d) D) M) 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 (/ (pow l 3) h)) (sqrt (* l h)) (sqrt (/ d l)) (* (/ 2 M) (/ d D)) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))
9.0ms	l	@	-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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* l l)) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* (* (* M M) -1/8) (/ (* D D) d)) (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (sqrt h)) (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (* (* (/ 1/2 d) D) M) 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 (/ (pow l 3) h)) (sqrt (* l h)) (sqrt (/ d l)) (* (/ 2 M) (/ d D)) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))

simplify257.0ms (1.5%)

Memory

-3.3MiB live, 323.3MiB allocated

Algorithm

1×	egg-herbie

Rules

8 012×	`lower-*.f64`
8 012×	`lower-*.f32`
5 546×	`lower-fma.f64`
5 546×	`lower-fma.f32`
3 412×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	372	20249
1	1131	19535
2	4131	19396
3	7780	19348
0	8012	18892

Stop Event

1×	iter limit
1×	node limit

Counts

1 116 → 1 116

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

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

rewrite211.0ms (1.2%)

Memory

-3.8MiB live, 230.8MiB allocated

Rules

6 464×	`lower-*.f32`
6 416×	`lower-*.f64`
3 798×	`lower-/.f32`
3 768×	`lower-/.f64`
2 528×	`lower--.f32`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	88	420
0	150	402
1	443	382
2	3020	362
0	10011	362

Stop Event

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

Counts

26 → 783

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

eval352.0ms (2%)

Memory: 51.0MiB live, 452.3MiB allocated
Compiler: Compiled 62 280 to 3 573 computations (94.3% saved)

prune395.0ms (2.3%)

Memory

-20.1MiB live, 554.8MiB allocated

Pruning

63 alts after pruning (62 fresh and 1 done)

	Pruned	Kept	Total
New	1 990	57	2 047
Fresh	17	5	22
Picked	4	1	5
Done	0	0	0
Total	2 011	63	2 074

Accuracy

93.8%

Counts

2 074 → 63

Alt Table

Click to see full alt table

Status	Accuracy	Program
	46.1%	(/.f64 (.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
	46.8%	(/.f64 (.f64 (/.f64 (.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 l)) (sqrt.f64 d)) (sqrt.f64 h))
	45.5%	(/.f64 (.f64 (.f64 (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (sqrt.f64 h))
	46.3%	(/.f64 (.f64 (.f64 (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)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (sqrt.f64 h))
	45.1%	(/.f64 (.f64 (.f64 (fma.f64 (.f64 (/.f64 (.f64 (neg.f64 M) (.f64 (/.f64 #s(literal 1/2 binary64) d) D)) l) (.f64 #s(literal 1/4 binary64) D)) (*.f64 (/.f64 M d) h) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (sqrt.f64 h))
	46.4%	(/.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)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 d)) (sqrt.f64 h))
	33.1%	(/.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)))
	31.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)))
	41.3%	(/.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))
	43.8%	(/.f64 (.f64 (.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (sqrt.f64 d)) (sqrt.f64 h))
	17.5%	(/.f64 (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d 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 d)) (sqrt.f64 h))
	4.9%	(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 d)) (sqrt.f64 h))
	15.2%	(/.f64 #s(approx (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (.f64 h (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))))))) (sqrt.f64 h))
	2.7%	(/.f64 #s(approx (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) (sqrt.f64 h))
	40.7%	(.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
	56.5%	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h 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)))
	67.6%	(.f64 (.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	32.8%	(.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))))))
	44.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
▶	70.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
	69.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (fma.f64 (.f64 (.f64 (/.f64 h l) #s(literal -1/2 binary64)) (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M)) (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #s(literal 1 binary64)))
	69.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/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) h)) l)))
	69.9%	(.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 (/.f64 #s(literal 1/2 binary64) d) D) M) (/.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) l))))
	67.4%	(.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 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (.f64 (/.f64 #s(literal 1/2 binary64) d) D)) (/.f64 M l))))
	26.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))))
	67.4%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d))) (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))))
	44.1%	(.f64 (.f64 (.f64 (pow.f64 (.f64 d (pow.f64 h #s(literal -1/2 binary64))) #s(literal 1/2 binary64)) (pow.f64 h #s(literal -1/4 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))))))
	68.2%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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))))
	44.7%	(.f64 (sqrt.f64 d) (/.f64 (.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 h)))
	20.3%	#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (sqrt h)) (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))))
	44.1%	#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (sqrt 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))
	24.3%	#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (sqrt h)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	14.1%	#s(approx (* (* (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))))) (.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))))
	27.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 (/.f64 (pow.f64 l #s(literal 3/2 binary64)) (sqrt.f64 h)) d (.f64 (sqrt.f64 (.f64 l h)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) d))) (*.f64 l l)))
	28.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)) (sqrt.f64 (.f64 l h)) (.f64 (.f64 l (sqrt.f64 (/.f64 l h))) d)) (.f64 l l)))
	21.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 M (.f64 (.f64 #s(literal -1/8 binary64) M) (.f64 (sqrt.f64 (.f64 l h)) (/.f64 (.f64 D D) d))) (.f64 (/.f64 (pow.f64 l #s(literal 3/2 binary64)) (sqrt.f64 h)) d)) (*.f64 l l)))
	26.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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)))
▶	40.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 d l)) (sqrt.f64 (/.f64 h d))))
	15.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 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
	17.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
	16.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 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
	21.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 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))))
	20.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) d)) (sqrt.f64 (.f64 (/.f64 h d) l))))
	16.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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (.f64 l h))))) (*.f64 l l)))
	8.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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)))
	9.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 l l)))
▶	27.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
	32.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
	27.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 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1/4 binary64)) #s(literal 2 binary64)) d))
	2.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 (pow.f64 l #s(literal -1 binary64)))) (sqrt.f64 (neg.f64 h))) d))
	27.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 #s(literal 1 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal -1 binary64))))) d))
	27.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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
▶	12.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 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
	22.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (pow.f64 (.f64 (.f64 l h) (.f64 l h)) #s(literal -1/2 binary64))) d))
	27.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 (pow.f64 l #s(literal -1 binary64)) h)) d))
	40.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 d l)) (sqrt.f64 (/.f64 d h))))
✓	27.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 #s(literal 1 binary64) (.f64 l h))) d))
	22.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (.f64 l h) (.f64 l h))))) d))
	20.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 d) (sqrt.f64 (pow.f64 (.f64 h (/.f64 l d)) #s(literal -1 binary64)))))
▶	26.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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d))
	28.8%	#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) d) h)))
	32.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 d l) (/.f64 d h))))
	30.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (exp.f64 (.f64 (log.f64 (.f64 (/.f64 d l) (/.f64 d h))) #s(literal 1/2 binary64))))

Compiler

Compiled 2 669 to 2 301 computations (13.8% saved)

simplify134.0ms (0.8%)

Memory

22.1MiB live, 161.9MiB 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 #s(literal 1/8 binary64) (.f64 D D))
cost-diff	0	(.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d))
cost-diff	0	(.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)))))
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 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
cost-diff	0	(/.f64 d l)
cost-diff	0	(sqrt.f64 (/.f64 d l))
cost-diff	0	(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 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 d l)) (sqrt.f64 (/.f64 h d))))
cost-diff	0	(*.f64 l h)
cost-diff	0	(sqrt.f64 (*.f64 l h))
cost-diff	0	(/.f64 d (sqrt.f64 (*.f64 l h)))
cost-diff	0	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
cost-diff	0	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
cost-diff	128	(neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)))
cost-diff	704	(/.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

7 258×	`lower-*.f32`
7 228×	`lower-*.f64`
2 974×	`lower--.f64`
2 974×	`lower--.f32`
2 860×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	67	445
0	104	428
1	194	425
2	558	425
3	3361	425
4	6902	425
0	8360	421

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

localize271.0ms (1.6%)

Memory

-15.7MiB live, 329.1MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.234375	(.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d)
accuracy	5.0839001144525175	(exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal -1/2 binary64)))
accuracy	15.16840449251887	(log.f64 (*.f64 l h))
accuracy	45.21302620675454	#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	8.38522748773801	(.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)))))
accuracy	17.804976609797087	(.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d))
accuracy	21.75654549009798	(sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))
accuracy	48.543203223501315	#s(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))))))
accuracy	0.32259750976844204	(/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d)))
accuracy	14.154679607586353	(sqrt.f64 (/.f64 h d))
accuracy	15.665658545912652	(sqrt.f64 (/.f64 d l))
accuracy	31.16106247426118	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))
accuracy	0	(*.f64 l h)
accuracy	0.18359375	(/.f64 d (sqrt.f64 (*.f64 l h)))
accuracy	14.832083825885459	(sqrt.f64 (*.f64 l h))
accuracy	45.21302620675454	#s(approx (* (* (pow (/ d h) (/ 1 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	6.096999422616426	(.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))
accuracy	6.104982393541176	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
accuracy	14.316040841263849	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	15.665658545912652	(sqrt.f64 (/.f64 d l))

Samples

209.0ms

256×

valid

Compiler

Compiled 435 to 62 computations (85.7% saved)

Precisions

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

ival-pow: 49.0ms (29% of total)

ival-add: 41.0ms (24.3% of total)

ival-mult: 38.0ms (22.5% of total)

ival-div: 22.0ms (13% of total)

ival-sqrt: 7.0ms (4.1% of total)

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

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

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

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

exact: 1.0ms (0.6% of total)

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

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

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

series276.0ms (1.6%)

Memory

34.7MiB live, 501.2MiB allocated

Counts

24 → 852

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

Calls

15 calls:

Time	Variable		Point	Expression
47.0ms	h	@	-inf	((pow (/ d h) (/ 1 2)) (/ 1 2) (neg (* (* (/ M d) h) (* 1/4 D))) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (+ (* (/ (* (* (/ 1/2 d) D) M) l) (neg (* (* (/ M d) h) (* 1/4 D)))) 1)) (* (* (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 (/ d l)) (sqrt (/ h d))) (sqrt (/ d l)) (/ d l) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (* 1/8 (* D D)) (/ (* M M) d)) (* 1/8 (* D D)) (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) (* (* (/ M d) h) (* 1/4 D)) (sqrt (/ h d)) (sqrt (/ h (pow l 3))) (log (* l h)))
36.0ms	h	@	0	((pow (/ d h) (/ 1 2)) (/ 1 2) (neg (* (* (/ M d) h) (* 1/4 D))) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (+ (* (/ (* (* (/ 1/2 d) D) M) l) (neg (* (* (/ M d) h) (* 1/4 D)))) 1)) (* (* (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 (/ d l)) (sqrt (/ h d))) (sqrt (/ d l)) (/ d l) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (* 1/8 (* D D)) (/ (* M M) d)) (* 1/8 (* D D)) (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) (* (* (/ M d) h) (* 1/4 D)) (sqrt (/ h d)) (sqrt (/ h (pow l 3))) (log (* l h)))
29.0ms	h	@	inf	((pow (/ d h) (/ 1 2)) (/ 1 2) (neg (* (* (/ M d) h) (* 1/4 D))) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (+ (* (/ (* (* (/ 1/2 d) D) M) l) (neg (* (* (/ M d) h) (* 1/4 D)))) 1)) (* (* (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 (/ d l)) (sqrt (/ h d))) (sqrt (/ d l)) (/ d l) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (* 1/8 (* D D)) (/ (* M M) d)) (* 1/8 (* D D)) (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) (* (* (/ M d) h) (* 1/4 D)) (sqrt (/ h d)) (sqrt (/ h (pow l 3))) (log (* l h)))
23.0ms	l	@	0	((pow (/ d h) (/ 1 2)) (/ 1 2) (neg (* (* (/ M d) h) (* 1/4 D))) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (+ (* (/ (* (* (/ 1/2 d) D) M) l) (neg (* (* (/ M d) h) (* 1/4 D)))) 1)) (* (* (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 (/ d l)) (sqrt (/ h d))) (sqrt (/ d l)) (/ d l) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (* 1/8 (* D D)) (/ (* M M) d)) (* 1/8 (* D D)) (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) (* (* (/ M d) h) (* 1/4 D)) (sqrt (/ h d)) (sqrt (/ h (pow l 3))) (log (* l h)))
20.0ms	l	@	-inf	((pow (/ d h) (/ 1 2)) (/ 1 2) (neg (* (* (/ M d) h) (* 1/4 D))) (* (* (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (+ (* (/ (* (* (/ 1/2 d) D) M) l) (neg (* (* (/ M d) h) (* 1/4 D)))) 1)) (* (* (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 (/ d l)) (sqrt (/ h d))) (sqrt (/ d l)) (/ d l) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (* 1/8 (* D D)) (/ (* M M) d)) (sqrt (/ h (pow l 3)))) (* (* 1/8 (* D D)) (/ (* M M) d)) (* 1/8 (* D D)) (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) (* (* (/ M d) h) (* 1/4 D)) (sqrt (/ h d)) (sqrt (/ h (pow l 3))) (log (* l h)))

simplify252.0ms (1.4%)

Memory

-40.1MiB live, 244.2MiB allocated

Algorithm

1×	egg-herbie

Rules

5 506×	`lower-fma.f64`
5 506×	`lower-fma.f32`
4 996×	`lower-*.f64`
4 996×	`lower-*.f32`
2 604×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	161	12372
1	429	11960
2	1330	11907
3	2591	11832
4	5343	11832
0	8810	11637

Stop Event

1×	iter limit
1×	node limit

Counts

852 → 852

Calls

Call 1

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

rewrite168.0ms (1%)

Memory

16.9MiB live, 208.0MiB allocated

Rules

5 066×	`lower-/.f32`
5 046×	`lower-/.f64`
4 572×	`lower-*.f32`
4 542×	`lower-*.f64`
3 094×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	67	318
0	104	298
1	325	291
2	2021	285
0	8421	281

Stop Event

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

Counts

24 → 628

Calls

Call 1

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

eval279.0ms (1.6%)

Memory: 0.1MiB live, 377.8MiB allocated
Compiler: Compiled 36 978 to 2 491 computations (93.3% saved)

prune246.0ms (1.4%)

Memory

13.9MiB live, 454.6MiB allocated

Pruning

65 alts after pruning (62 fresh and 3 done)

	Pruned	Kept	Total
New	1 585	28	1 613
Fresh	23	34	57
Picked	3	2	5
Done	0	1	1
Total	1 611	65	1 676

Accuracy

95.3%

Counts

1 676 → 65

Alt Table

Click to see full alt table

Status	Accuracy	Program
	44.0%	(fma.f64 (.f64 (/.f64 M l) (.f64 (/.f64 #s(literal 1/2 binary64) d) D)) (.f64 (.f64 (.f64 #s(literal -1/4 binary64) D) (.f64 (/.f64 M d) h)) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d)))
	48.0%	(/.f64 (fma.f64 (sqrt.f64 (/.f64 d l)) l (.f64 (sqrt.f64 (/.f64 h d)) (.f64 (.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) (.f64 (.f64 #s(literal -1/4 binary64) D) (.f64 (/.f64 M d) h))) (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) d))))) (.f64 (sqrt.f64 (/.f64 h d)) l))
	46.1%	(/.f64 (.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
	46.8%	(/.f64 (.f64 (/.f64 (.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 l)) (sqrt.f64 d)) (sqrt.f64 h))
	46.3%	(/.f64 (.f64 (.f64 (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)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (sqrt.f64 h))
	46.4%	(/.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)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 d)) (sqrt.f64 h))
	41.3%	(/.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))
	43.8%	(/.f64 (.f64 (.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (sqrt.f64 d)) (sqrt.f64 h))
	17.5%	(/.f64 (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d 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 d)) (sqrt.f64 h))
	4.9%	(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 d)) (sqrt.f64 h))
	15.2%	(/.f64 #s(approx (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (.f64 h (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))))))) (sqrt.f64 h))
	2.7%	(/.f64 #s(approx (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) (sqrt.f64 h))
	54.9%	(.f64 (fma.f64 (/.f64 (.f64 #s(literal -1/4 binary64) D) l) (/.f64 (.f64 (/.f64 M d) h) (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	40.7%	(.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
	56.5%	(.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (/.f64 h 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.3%	(.f64 (.f64 (fma.f64 (/.f64 (.f64 #s(literal -1/4 binary64) D) l) (/.f64 (.f64 (/.f64 M d) h) (*.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	67.6%	(.f64 (.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	32.7%	(.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)))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
	43.9%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
	45.5%	(.f64 (.f64 (/.f64 (pow.f64 h #s(literal -1/2 binary64)) (pow.f64 d #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
	34.1%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
	45.5%	(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
	67.4%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d))) (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))))
	34.1%	(.f64 (.f64 (.f64 (pow.f64 (pow.f64 (neg.f64 d) #s(literal -1 binary64)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 h) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
▶	70.3%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
▶	68.2%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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))))
	44.7%	(.f64 (sqrt.f64 d) (/.f64 (.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 h)))
	20.3%	#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (sqrt h)) (fma.f64 (.f64 (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 D D)) (/.f64 (.f64 (neg.f64 M) M) d)) #s(literal -1/8 binary64) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))))
	44.1%	#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (sqrt 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))
	24.3%	#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (sqrt h)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	31.7%	#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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #s(literal -1/8 binary64)) (.f64 (.f64 (/.f64 (.f64 M M) d) D) D) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)))
	27.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 (/.f64 (pow.f64 l #s(literal 3/2 binary64)) (sqrt.f64 h)) d (.f64 (sqrt.f64 (.f64 l h)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (.f64 M D) #s(literal 2 binary64))) d))) (*.f64 l l)))
	28.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)) (sqrt.f64 (.f64 l h)) (.f64 (.f64 l (sqrt.f64 (/.f64 l h))) d)) (.f64 l l)))
	20.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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 h d))))
	26.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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)))
	8.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 d l)) #s(approx (sqrt (/ h d)) (neg.f64 (sqrt.f64 (/.f64 h d))))))
	17.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
	16.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 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (.f64 d d)) (sqrt.f64 (.f64 l h))))
▶	21.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 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))))
	16.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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (.f64 l h))))) (*.f64 l l)))
▶	8.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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)))
	9.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)))) (.f64 l l)))
	27.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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
✓	27.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
	26.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 (exp.f64 (.f64 (log.f64 (.f64 l h)) #s(literal 1/2 binary64)))))
	20.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 h d) l)) (sqrt.f64 d))))
	27.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
	27.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 (pow.f64 (pow.f64 (.f64 l h) #s(literal -1/4 binary64)) #s(literal 2 binary64)) d))
	15.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 D M) #s(literal 2 binary64))) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
	14.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 #s(literal 1 binary64) (/.f64 (neg.f64 d) (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (*.f64 (neg.f64 M) M)))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
	15.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 d (.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 D M) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
▶	27.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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
	14.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 (.f64 (/.f64 M d) M) (*.f64 #s(literal 1/8 binary64) D)) D) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
	15.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 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (/.f64 (sqrt.f64 (/.f64 h l)) (fabs.f64 l))))
	27.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 (pow.f64 l #s(literal -1 binary64)) h)) d))
	18.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 (/.f64 d l) (neg.f64 h))) (sqrt.f64 (neg.f64 d))))
	20.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 (/.f64 d l) h)) (sqrt.f64 d)))
	40.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 d l)) (sqrt.f64 (/.f64 d h))))
✓	27.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 #s(literal 1 binary64) (.f64 l h))) d))
	22.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (.f64 l h) (.f64 l h))))) d))
✓	26.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 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d))
	31.4%	#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)))
	32.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 d l) (/.f64 d h))))
	24.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 (.f64 l h)) d)) #s(literal -1 binary64))))

Compiler

Compiled 2 640 to 2 284 computations (13.5% saved)

simplify128.0ms (0.7%)

Memory

7.4MiB live, 169.6MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

7 002×	`lower-*.f32`
6 966×	`lower-*.f64`
2 770×	`lower-fma.f32`
2 768×	`lower-fma.f64`
2 524×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	85	572
0	128	554
1	223	551
2	656	551
3	3630	551
4	7149	551
0	8153	543

Stop Event

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

Calls

Call 1

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

localize301.0ms (1.7%)

Memory

-0.2MiB live, 315.3MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	2.933733618227872	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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))))
accuracy	5.432631901872805	(.f64 (.f64 (/.f64 #s(literal 1 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.719338958865941	(sqrt.f64 (/.f64 d l))
accuracy	7.895451219520499	(sqrt.f64 (/.f64 d h))
accuracy	4.399109747420653	(/.f64 (pow.f64 l #s(literal 3 binary64)) h)
accuracy	12.230202106162883	(sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h))
accuracy	13.70116207517525	(/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l))
accuracy	17.109602873410715	#s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d))
accuracy	0.146816259768442	(/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))
accuracy	1.7282753229496117	(*.f64 h (/.f64 l d))
accuracy	10.775853642643995	(sqrt.f64 (*.f64 h (/.f64 l d)))
accuracy	17.997951449818135	#s(approx (* (* (pow (/ 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 #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))))
accuracy	0.1328125	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)
accuracy	0.15625	(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 l h)))
accuracy	8.455766866124213	(sqrt.f64 (*.f64 l h))
accuracy	17.997951449818135	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
accuracy	3.2402378432857946	(.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))
accuracy	3.8765180248947675	(/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l)
accuracy	7.719338958865941	(sqrt.f64 (/.f64 d l))
accuracy	7.895451219520499	(sqrt.f64 (/.f64 d h))

Samples

122.0ms	142×	0	valid
86.0ms	114×	0	invalid

Compiler

Compiled 526 to 67 computations (87.3% saved)

Precisions

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

ival-mult: 92.0ms (51.6% of total)

ival-div: 33.0ms (18.5% of total)

ival-pow: 30.0ms (16.8% of total)

ival-sqrt: 14.0ms (7.9% of total)

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

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

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

exact: 1.0ms (0.6% of total)

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

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

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

series184.0ms (1.1%)

Memory

-26.0MiB live, 262.9MiB allocated

Counts

27 → 1 068

Calls

Call 1

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

Outputs
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ 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 #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 h) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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))))) h) (taylor 0 h) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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))))) h) (taylor 0 h) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) 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))))) h) (taylor 0 h) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) 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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor 0 h) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor 0 h) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor 0 h) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor 0 h) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor 0 h) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor 0 h) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor 0 h) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor 0 h) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) 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 (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ 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 #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf h) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3)))))) (taylor inf h) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3)))))) (taylor inf h) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ l h)))) (* d (sqrt (/ (pow l 3) (pow h 3)))))) (taylor inf h) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) 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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor inf h) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor inf h) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor inf h) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor inf h) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor inf h) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor inf h) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor inf h) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor inf h) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) 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 (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) 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 (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ 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 #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l)))) (taylor -inf h) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h))))))) (taylor -inf h) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h))))))) (taylor -inf h) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) (pow h 3))))) (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ l h))))))) (taylor -inf h) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) 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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (* h l) d)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (* h l) d)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (* h l) d)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (* h l) d)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor -inf h) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor -inf h) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor -inf h) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor -inf h) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor -inf h) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor -inf h) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor -inf h) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor -inf h) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) 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 (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ 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 #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 M) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 M) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 M) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 M) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<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/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ 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 #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf M) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor inf M) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor inf M) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor inf M) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<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/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ 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 #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf M) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf M) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf M) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (* h l)))) (* (/ d (pow M 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf M) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<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 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ 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 #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 l) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) 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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor 0 l) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor 0 l) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor 0 l) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor 0 l) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor 0 l) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor 0 l) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor 0 l) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor 0 l) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) 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 (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ 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 #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf l) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* -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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) 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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor inf l) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor inf l) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor inf l) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor inf l) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor inf l) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor inf l) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor inf l) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor inf l) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) 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 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ 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 #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h))) (taylor -inf l) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/8 (* (/ (* (pow 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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/8 (* (/ (* (pow 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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 1/8 (* (/ (* (pow 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 (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) 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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (* h l) d)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (* h l) d)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (* h l) d)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ (* h l) d)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor -inf l) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor -inf l) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor -inf l) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor -inf l) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) (patch (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor -inf l) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor -inf l) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor -inf l) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) h) #<representation binary64>) () ())) ())
#s(alt (/ (pow l 3) h) (taylor -inf l) (#s(alt (/.f64 (pow.f64 l #s(literal 3 binary64)) h) (patch (/.f64 (pow.f64 l #s(literal 3 binary64)) 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 (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ 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 #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 D) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 D) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 D) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (taylor 0 D) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<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/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ 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 #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf D) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor inf D) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor inf D) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor inf D) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<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/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ 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 #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf D) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf D) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf D) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (* h l)))) (* (/ d (pow D 2)) (sqrt (/ (pow l 3) h))))) (taylor -inf D) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<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/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (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 (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt d (taylor 0 d) (#s(alt (.f64 d #s(literal 1 binary64)) (patch (.f64 d #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt d (taylor 0 d) (#s(alt (.f64 d #s(literal 1 binary64)) (patch (.f64 d #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt d (taylor 0 d) (#s(alt (.f64 d #s(literal 1 binary64)) (patch (.f64 d #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt d (taylor 0 d) (#s(alt (.f64 d #s(literal 1 binary64)) (patch (.f64 d #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ 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 #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 d #s(literal 1 binary64))) (patch (sqrt.f64 (.f64 d #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 d #s(literal 1 binary64))) (patch (sqrt.f64 (.f64 d #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 d #s(literal 1 binary64))) (patch (sqrt.f64 (.f64 d #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 d #s(literal 1 binary64))) (patch (sqrt.f64 (.f64 d #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 d) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d) (taylor 0 d) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d) (taylor 0 d) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (* h l)))) (* (pow d 2) (sqrt (/ (pow l 3) h)))) d) (taylor 0 d) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor 0 d) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor 0 d) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor 0 d) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor 0 d) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<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/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (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 (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt d (taylor inf d) (#s(alt (.f64 d #s(literal 1 binary64)) (patch (.f64 d #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt d (taylor inf d) (#s(alt (.f64 d #s(literal 1 binary64)) (patch (.f64 d #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt d (taylor inf d) (#s(alt (.f64 d #s(literal 1 binary64)) (patch (.f64 d #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt d (taylor inf d) (#s(alt (.f64 d #s(literal 1 binary64)) (patch (.f64 d #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 (.f64 d #s(literal 1 binary64))) (patch (sqrt.f64 (.f64 d #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 (.f64 d #s(literal 1 binary64))) (patch (sqrt.f64 (.f64 d #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 (.f64 d #s(literal 1 binary64))) (patch (sqrt.f64 (.f64 d #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 (.f64 d #s(literal 1 binary64))) (patch (sqrt.f64 (.f64 d #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf d) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))) (taylor inf d) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))) (taylor inf d) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ (pow l 3) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l)))))) (taylor inf d) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor inf d) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor inf d) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor inf d) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (* h l) d)) (taylor inf d) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor inf d) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor inf d) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor inf d) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor inf d) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<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/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (patch (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (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 (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) (patch (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt d (taylor -inf d) (#s(alt (.f64 d #s(literal 1 binary64)) (patch (.f64 d #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt d (taylor -inf d) (#s(alt (.f64 d #s(literal 1 binary64)) (patch (.f64 d #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt d (taylor -inf d) (#s(alt (.f64 d #s(literal 1 binary64)) (patch (.f64 d #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt d (taylor -inf d) (#s(alt (.f64 d #s(literal 1 binary64)) (patch (.f64 d #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (patch (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 d #s(literal 1 binary64))) (patch (sqrt.f64 (.f64 d #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 d #s(literal 1 binary64))) (patch (sqrt.f64 (.f64 d #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 d #s(literal 1 binary64))) (patch (sqrt.f64 (.f64 d #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 d #s(literal 1 binary64))) (patch (sqrt.f64 (.f64 d #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l 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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) (patch (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor -inf d) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))) (taylor -inf d) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))) (taylor -inf d) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1 (sqrt (/ (pow l 3) h))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (* h l))))))) (taylor -inf d) (#s(alt #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (patch #s(approx (+ ( (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (*.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) (patch (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d) #<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 (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<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 (sqrt.f64 (/.f64 d h)) (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)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (patch (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (* h l) d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 h (/.f64 l d))) (patch (sqrt.f64 (.f64 h (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor -inf d) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor -inf d) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor -inf d) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (/ (* h l) d) (taylor -inf d) (#s(alt (.f64 h (/.f64 l d)) (patch (.f64 h (/.f64 l d)) #<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>) () ())) ())

Calls

15 calls:

Time	Variable		Point	Expression
28.0ms	M	@	inf	((neg (* (* (/ M d) h) (* 1/4 D))) (* (* (sqrt (/ d h)) (sqrt (/ d l))) (+ (* (/ (* (* (/ 1/2 d) D) M) l) (neg (* (* (/ M d) h) (* 1/4 D)))) 1)) (* (sqrt (/ d h)) (sqrt (/ d l))) (sqrt (/ d h)) (* (/ 1 (sqrt (* l h))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (sqrt (* l h))) (sqrt (* l h)) (* d 1) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt (* d 1)) (sqrt (* h (/ l d)))) (sqrt (* d 1)) (* (* (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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* l l)) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* (sqrt (/ (pow l 3) h)) d) (/ 1 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (sqrt (/ d h)) (sqrt (/ d l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ d l)) (/ (* (* (/ 1/2 d) D) M) l) (* (* (/ M d) h) (* 1/4 D)) (sqrt (* h (/ l d))) (* h (/ l d)) (sqrt (/ (pow l 3) h)) (/ (pow l 3) h) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))
12.0ms	h	@	0	((neg (* (* (/ M d) h) (* 1/4 D))) (* (* (sqrt (/ d h)) (sqrt (/ d l))) (+ (* (/ (* (* (/ 1/2 d) D) M) l) (neg (* (* (/ M d) h) (* 1/4 D)))) 1)) (* (sqrt (/ d h)) (sqrt (/ d l))) (sqrt (/ d h)) (* (/ 1 (sqrt (* l h))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (sqrt (* l h))) (sqrt (* l h)) (* d 1) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt (* d 1)) (sqrt (* h (/ l d)))) (sqrt (* d 1)) (* (* (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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* l l)) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* (sqrt (/ (pow l 3) h)) d) (/ 1 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (sqrt (/ d h)) (sqrt (/ d l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ d l)) (/ (* (* (/ 1/2 d) D) M) l) (* (* (/ M d) h) (* 1/4 D)) (sqrt (* h (/ l d))) (* h (/ l d)) (sqrt (/ (pow l 3) h)) (/ (pow l 3) h) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))
11.0ms	d	@	-inf	((neg (* (* (/ M d) h) (* 1/4 D))) (* (* (sqrt (/ d h)) (sqrt (/ d l))) (+ (* (/ (* (* (/ 1/2 d) D) M) l) (neg (* (* (/ M d) h) (* 1/4 D)))) 1)) (* (sqrt (/ d h)) (sqrt (/ d l))) (sqrt (/ d h)) (* (/ 1 (sqrt (* l h))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (sqrt (* l h))) (sqrt (* l h)) (* d 1) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt (* d 1)) (sqrt (* h (/ l d)))) (sqrt (* d 1)) (* (* (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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* l l)) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* (sqrt (/ (pow l 3) h)) d) (/ 1 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (sqrt (/ d h)) (sqrt (/ d l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ d l)) (/ (* (* (/ 1/2 d) D) M) l) (* (* (/ M d) h) (* 1/4 D)) (sqrt (* h (/ l d))) (* h (/ l d)) (sqrt (/ (pow l 3) h)) (/ (pow l 3) h) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))
10.0ms	l	@	-inf	((neg (* (* (/ M d) h) (* 1/4 D))) (* (* (sqrt (/ d h)) (sqrt (/ d l))) (+ (* (/ (* (* (/ 1/2 d) D) M) l) (neg (* (* (/ M d) h) (* 1/4 D)))) 1)) (* (sqrt (/ d h)) (sqrt (/ d l))) (sqrt (/ d h)) (* (/ 1 (sqrt (* l h))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (sqrt (* l h))) (sqrt (* l h)) (* d 1) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt (* d 1)) (sqrt (* h (/ l d)))) (sqrt (* d 1)) (* (* (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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* l l)) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* (sqrt (/ (pow l 3) h)) d) (/ 1 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (sqrt (/ d h)) (sqrt (/ d l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ d l)) (/ (* (* (/ 1/2 d) D) M) l) (* (* (/ M d) h) (* 1/4 D)) (sqrt (* h (/ l d))) (* h (/ l d)) (sqrt (/ (pow l 3) h)) (/ (pow l 3) h) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))
8.0ms	d	@	0	((neg (* (* (/ M d) h) (* 1/4 D))) (* (* (sqrt (/ d h)) (sqrt (/ d l))) (+ (* (/ (* (* (/ 1/2 d) D) M) l) (neg (* (* (/ M d) h) (* 1/4 D)))) 1)) (* (sqrt (/ d h)) (sqrt (/ d l))) (sqrt (/ d h)) (* (/ 1 (sqrt (* l h))) d) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ 1 (sqrt (* l h))) (sqrt (* l h)) (* d 1) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ (sqrt (* d 1)) (sqrt (* h (/ l d)))) (sqrt (* d 1)) (* (* (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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* l l)) (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (* (sqrt (/ (pow l 3) h)) d) (/ 1 2) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (sqrt (/ d h)) (sqrt (/ d l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ d l)) (/ (* (* (/ 1/2 d) D) M) l) (* (* (/ M d) h) (* 1/4 D)) (sqrt (* h (/ l d))) (* h (/ l d)) (sqrt (/ (pow l 3) h)) (/ (pow l 3) h) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))

simplify250.0ms (1.4%)

Memory

24.3MiB live, 311.4MiB allocated

Algorithm

1×	egg-herbie

Rules

8 470×	`lower-*.f64`
8 470×	`lower-*.f32`
3 858×	`lower-fma.f64`
3 858×	`lower-fma.f32`
2 364×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	233	16625
1	698	16107
2	2505	15973
3	5643	15878
0	8101	15560

Stop Event

1×	iter limit
1×	node limit

Counts

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

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

rewrite588.0ms (3.4%)

Memory

-176.3MiB live, 393.5MiB allocated

Rules

5 308×	`lower-*.f32`
5 272×	`lower-*.f64`
4 196×	`lower-/.f32`
4 172×	`lower-/.f64`
2 122×	`lower-fma.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	85	421
0	128	395
1	383	392
2	2316	370
0	8343	362

Stop Event

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

Counts

27 → 1 130

Calls

Call 1

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

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>

eval370.0ms (2.1%)

Memory: -10.2MiB live, 604.0MiB allocated
Compiler: Compiled 63 055 to 3 558 computations (94.4% saved)

prune255.0ms (1.5%)

Memory

10.5MiB live, 444.0MiB allocated

Pruning

61 alts after pruning (57 fresh and 4 done)

	Pruned	Kept	Total
New	2 423	23	2 446
Fresh	23	34	57
Picked	3	2	5
Done	1	2	3
Total	2 450	61	2 511

Accuracy

95.7%

Counts

2 511 → 61

Alt Table

Click to see full alt table

Status	Accuracy	Program
	38.1%	(fma.f64 (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (.f64 (/.f64 M l) (.f64 (/.f64 #s(literal 1/2 binary64) d) D))) (.f64 (.f64 #s(literal -1/4 binary64) D) (.f64 h (/.f64 M d))) (/.f64 d (sqrt.f64 (.f64 l h))))
	46.1%	(/.f64 (.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 l))) (sqrt.f64 h))
	46.8%	(/.f64 (.f64 (/.f64 (.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (*.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 l)) (sqrt.f64 d)) (sqrt.f64 h))
	46.3%	(/.f64 (.f64 (.f64 (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)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 d)) (sqrt.f64 h))
	46.4%	(/.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)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (sqrt.f64 d)) (sqrt.f64 h))
	41.3%	(/.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))
	43.8%	(/.f64 (.f64 (.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) (sqrt.f64 d)) (sqrt.f64 h))
	17.5%	(/.f64 (.f64 (.f64 #s(approx (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d 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 d)) (sqrt.f64 h))
	4.9%	(/.f64 (.f64 #s(approx ( (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 d)) (sqrt.f64 h))
	15.2%	(/.f64 #s(approx (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (.f64 h (/.f64 (.f64 M M) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))))))) (sqrt.f64 h))
	2.7%	(/.f64 #s(approx (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (*.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) l)))) (sqrt.f64 h))
	54.9%	(.f64 (fma.f64 (/.f64 (.f64 #s(literal -1/4 binary64) D) l) (/.f64 (.f64 (/.f64 M d) h) (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	42.1%	(.f64 (fma.f64 (/.f64 (.f64 #s(literal -1/4 binary64) D) l) (/.f64 (.f64 h (/.f64 M d)) (.f64 (/.f64 #s(literal 2 binary64) M) (/.f64 d D))) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
	25.5%	(.f64 (/.f64 (sqrt.f64 (.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
	44.8%	(.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
	68.3%	(.f64 (.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) #s(literal 2 binary64))) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	48.0%	(.f64 (.f64 (/.f64 d (neg.f64 (sqrt.f64 l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
	34.1%	(.f64 (.f64 (.f64 (pow.f64 (pow.f64 (neg.f64 d) #s(literal -1 binary64)) #s(literal -1/2 binary64)) (pow.f64 (neg.f64 h) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
	69.8%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 h M) (*.f64 #s(literal -1/4 binary64) D)) d) #s(literal 1 binary64)))
	64.6%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (.f64 (/.f64 M d) (.f64 h (*.f64 #s(literal -1/4 binary64) D))) #s(literal 1 binary64)))
	67.4%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) D) M) (.f64 d l)) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
	68.4%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (.f64 M (/.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) l)) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
	47.9%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (fma.f64 (.f64 (/.f64 #s(literal -1/8 binary64) (.f64 l d)) (.f64 h (/.f64 (.f64 D D) d))) (*.f64 M M) #s(literal 1 binary64))))
	59.0%	(.f64 (sqrt.f64 (/.f64 d (.f64 (/.f64 l d) h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
	44.8%	(.f64 #s(approx ( (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
	34.3%	(.f64 #s(approx ( (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))
	33.1%	(.f64 #s(approx ( (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	44.1%	#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (sqrt 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))
	24.3%	#s(approx (/ (* (* (+ (* (* -1/2 (/ h l)) (pow (* (/ 2 M) (/ d D)) -2)) 1) (sqrt (/ d l))) (sqrt d)) (sqrt h)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	31.7%	#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 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) #s(literal -1/8 binary64)) (.f64 (.f64 (/.f64 (.f64 M M) d) D) D) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)))
	20.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 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 h d))))
	26.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 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)))
	8.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 d l)) #s(approx (sqrt (/ h d)) (neg.f64 (sqrt.f64 (/.f64 h d))))))
	17.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
	16.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 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 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 (sqrt.f64 (.f64 d d)) (sqrt.f64 (.f64 l h))))
	5.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 #s(literal 1 binary64))) #s(approx (sqrt ( h (/ l d))) (neg.f64 (sqrt.f64 (/.f64 (*.f64 l h) d))))))
	10.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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (/.f64 (.f64 (sqrt.f64 (neg.f64 l)) l) (sqrt.f64 (neg.f64 h))) d)) (*.f64 l l)))
	16.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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (.f64 l h))))) (*.f64 l l)))
	15.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 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (.f64 l h))))) (*.f64 l l)))
	22.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* (* (* (* M M) -1/8) (/ (* D D) d)) (sqrt (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (.f64 l (sqrt.f64 (/.f64 l h))) d)) (*.f64 l l)))
✓	8.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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (.f64 l l)))
	10.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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (sqrt.f64 (.f64 (.f64 l l) (/.f64 l h))) d)) (.f64 l l)))
	27.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 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
✓	27.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
	27.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
	31.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (*.f64 (/.f64 l d) h) d))))
	15.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 D M) #s(literal 2 binary64))) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
	14.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 #s(literal 1 binary64) (/.f64 (neg.f64 d) (.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) (*.f64 (neg.f64 M) M)))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
	15.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 d (.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 D M) #s(literal 2 binary64))))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
	27.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 #s(literal 1 binary64) (.f64 (sqrt.f64 l) (sqrt.f64 h))) d))
✓	27.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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
	14.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 (.f64 (/.f64 M d) M) (*.f64 #s(literal 1/8 binary64) D)) D) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
	15.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 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (/.f64 (sqrt.f64 (/.f64 h l)) (fabs.f64 l))))
	18.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 (/.f64 d l) (neg.f64 h))) (sqrt.f64 (neg.f64 d))))
	20.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 d (.f64 l h))) (sqrt.f64 d)))
	40.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 d l)) (sqrt.f64 (/.f64 d h))))
✓	27.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 #s(literal 1 binary64) (.f64 l h))) d))
	22.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (.f64 l h) (.f64 l h))))) d))
	31.4%	#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)))
	32.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 d l) (/.f64 d h))))

Compiler

Compiled 4 434 to 1 699 computations (61.7% saved)

regimes449.0ms (2.6%)

Memory

-13.4MiB live, 325.6MiB allocated

Counts

136 → 4

Calls

Call 1

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

Calls

7 calls:

92.0ms	D
73.0ms	h
64.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))))
63.0ms	d
63.0ms	(*.f64 M D)

Results

Accuracy	Segments	Branch
86.6%	4	`d`
82.1%	2	`h`
84.0%	3	`l`
70.7%	1	`M`
70.7%	1	`D`
76.1%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
70.7%	1	`(*.f64 M D)`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes67.0ms (0.4%)

Memory

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

Outputs

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

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

Calls

1 calls:

27.0ms

Results

Accuracy	Segments	Branch
84.6%	3	`d`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes27.0ms (0.2%)

Memory

24.8MiB live, 24.8MiB allocated

Counts

84 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

22.0ms

Results

Accuracy	Segments	Branch
84.4%	3	`d`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes87.0ms (0.5%)

Memory

12.2MiB live, 49.9MiB allocated

Counts

62 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

3 calls:

50.0ms	d
17.0ms	l
17.0ms	h

Results

Accuracy	Segments	Branch
82.6%	3	`h`
81.0%	2	`l`
81.0%	2	`d`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes98.0ms (0.6%)

Memory

-23.4MiB live, 21.4MiB allocated

Counts

51 → 4

Calls

Call 1

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

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

Calls

3 calls:

15.0ms	h
14.0ms	d
14.0ms	l

Results

Accuracy	Segments	Branch
76.5%	2	`l`
76.5%	2	`d`
80.4%	4	`h`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes30.0ms (0.2%)

Memory

18.7MiB live, 18.7MiB allocated

Counts

47 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

13.0ms	h
13.0ms	l

Results

Accuracy	Segments	Branch
76.5%	2	`l`
76.5%	2	`h`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes159.0ms (0.9%)

Memory

-16.3MiB live, 94.9MiB allocated

Counts

41 → 5

Calls

Call 1

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

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

Calls

7 calls:

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

Results

Accuracy	Segments	Branch
50.3%	2	`D`
53.3%	2	`M`
53.5%	2	`(*.f64 M D)`
61.7%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
70.8%	5	`d`
64.2%	2	`h`
67.0%	3	`l`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes90.0ms (0.5%)

Memory

-4.9MiB live, 42.4MiB allocated

Counts

38 → 3

Calls

Call 1

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

Outputs

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

Calls

6 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))))
11.0ms	M
11.0ms	d
11.0ms	h
11.0ms	l

Results

Accuracy	Segments	Branch
50.2%	2	`M`
49.0%	2	`(*.f64 M D)`
53.8%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
50.2%	3	`h`
52.6%	4	`l`
56.1%	6	`d`

Compiler

Compiled 42 to 48 computations (-14.3% saved)

regimes12.0ms (0.1%)

Memory

6.9MiB live, 6.9MiB allocated

Counts

35 → 3

Calls

Call 1

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

Outputs

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

Calls

1 calls:

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

Compiler

Compiled 35 to 22 computations (37.1% saved)

regimes140.0ms (0.8%)

Memory

19.4MiB live, 132.9MiB allocated

Counts

34 → 2

Calls

Call 1

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

Outputs

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

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

Calls

7 calls:

45.0ms	D
32.0ms	d
22.0ms	(*.f64 M D)
10.0ms	l
10.0ms	M

Results

Accuracy	Segments	Branch
48.8%	3	`h`
41.9%	2	`(*.f64 M D)`
47.4%	2	`l`
48.5%	3	`d`
42.3%	2	`M`
40.3%	1	`D`
47.4%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes43.0ms (0.2%)

Memory

-33.0MiB live, 10.8MiB allocated

Counts

5 → 2

Calls

Call 1

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

Outputs

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

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

Calls

4 calls:

35.0ms	l
2.0ms	d
2.0ms	h
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
31.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))))`
43.4%	2	`d`
43.4%	2	`h`
44.7%	2	`l`

Compiler

Compiled 38 to 37 computations (2.6% saved)

regimes14.0ms (0.1%)

Memory

22.0MiB live, 22.0MiB allocated

Accuracy

Total -0.0b remaining (-0.1%)

Threshold costs -0b (-0.1%)

Counts

3 → 1

Calls

Call 1

Inputs

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

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

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

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 43 to 53 computations (-23.3% saved)

bsearch236.0ms (1.4%)

Memory

20.8MiB live, 404.4MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
43.0ms	1.8745462335006343e-165	2.0361298434923264e-163
67.0ms	-7.824414311761277e-295	-3.84276330929239e-301
104.0ms	-9.057259081012013e-142	-1.0518814111347274e-144

Samples

99.0ms	453×	0	invalid
75.0ms	384×	0	valid

Compiler

Compiled 1 492 to 1 235 computations (17.2% saved)

Precisions

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

ival-div: 72.0ms (50.5% of total)

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

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

ival-pow2: 10.0ms (7% of total)

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

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

exact: 1.0ms (0.7% of total)

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

bsearch7.0ms (0%)

Memory

-22.3MiB live, 16.6MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	-7.824414311761277e-295	-3.84276330929239e-301
4.0ms	-9.057259081012013e-142	-1.0518814111347274e-144

Compiler

Compiled 1 108 to 905 computations (18.3% saved)

bsearch135.0ms (0.8%)

Memory

0.9MiB live, 264.8MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
70.0ms	-3.84276330929239e-301	-6.6575064153532954e-307
51.0ms	-1.6375291048907952e-52	-6.1346824165983066e-55

Samples

54.0ms	341×	0	invalid
46.0ms	272×	0	valid

Compiler

Compiled 1 142 to 939 computations (17.8% saved)

Precisions

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

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

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

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

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

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

exact: 1.0ms (1.3% of total)

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

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

bsearch100.0ms (0.6%)

Memory

7.2MiB live, 204.1MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
70.0ms	-6.482238843299732e-295	1.293758586800786e-297
20.0ms	-9.195795287710134e+151	-7.510498629061879e+151

Samples

42.0ms	224×	0	valid
32.0ms	216×	0	invalid

Compiler

Compiled 928 to 763 computations (17.8% saved)

Precisions

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

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

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

ival-pow: 16.0ms (27.3% of total)

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

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

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

exact: 0.0ms (0% of total)

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

bsearch16.0ms (0.1%)

Memory

-5.7MiB live, 33.3MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
10.0ms	1.4188255989347808e+190	1.6092975190490916e+190
2.0ms	-6.482238843299732e-295	1.293758586800786e-297
2.0ms	-9.195795287710134e+151	-7.510498629061879e+151

Samples

5.0ms	32×	0	valid
3.0ms	18×	0	invalid

Compiler

Compiled 1 000 to 813 computations (18.7% saved)

Precisions

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

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

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

ival-pow: 2.0ms (34.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)

bsearch106.0ms (0.6%)

Memory

-28.8MiB live, 129.8MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
97.0ms	-1.227129822455084e-304	7.941908530873519e-308

Samples

61.0ms	173×	0	invalid
24.0ms	144×	0	valid

Compiler

Compiled 578 to 471 computations (18.5% saved)

Precisions

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

ival-mult: 29.0ms (39.9% of total)

ival-div: 28.0ms (38.5% of total)

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch258.0ms (1.5%)

Memory

13.7MiB live, 490.9MiB allocated

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
52.0ms	-6.6575064153532954e-307	1.862573672262433e-304
49.0ms	-2.7596206271657386e-73	-3.7330497228863236e-75
77.0ms	-2.829656010611473e+23	-1.693721318606587e+21
53.0ms	-3.3765133853831954e+67	-6.473191666253516e+64

Samples

109.0ms	496×	0	valid
85.0ms	572×	0	invalid

Compiler

Compiled 1 188 to 1 117 computations (6% saved)

Precisions

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

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

ival-mult: 40.0ms (28% of total)

ival-pow2: 30.0ms (21% of total)

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

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

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

exact: 1.0ms (0.7% of total)

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

bsearch1.0ms (0%)

Memory

2.2MiB live, 2.3MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	2.851137086867786e-300
0.0ms	-7.638267556693626e-132	-2.165634282137451e-135

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch1.0ms (0%)

Memory

2.0MiB live, 1.9MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	0.0	2.851137086867786e-300
0.0ms	-7.638267556693626e-132	-2.165634282137451e-135

Compiler

Compiled 38 to 30 computations (21.1% saved)

bsearch50.0ms (0.3%)

Memory

16.7MiB live, 98.9MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
45.0ms	2.255294524368891e-295	5.650478974620207e-292

Samples

20.0ms	128×	0	valid
18.0ms	89×	0	invalid

Compiler

Compiled 182 to 222 computations (-22% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch62.0ms (0.4%)

Memory

5.6MiB live, 122.2MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
57.0ms	9.888916196389577e-189	1.1204957587239493e-182

Samples

32.0ms	144×	0	valid
16.0ms	109×	0	invalid

Compiler

Compiled 191 to 237 computations (-24.1% saved)

Precisions

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

ival-div: 15.0ms (39.9% of total)

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

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

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

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

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

exact: 0.0ms (0% of total)

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

simplify48.0ms (0.3%)

Memory

-16.2MiB live, 97.1MiB allocated

Algorithm

1×	egg-herbie

Rules

144×	`-commutative-binary64-.f64`
62×	`neg-sub0-binary64--.f64-neg.f64`
62×	`neg-mul-1-binary64-*.f64-neg.f64`
60×	`sub-neg-binary64-neg.f64-+.f64--.f64`
58×	`+-commutative-binary64-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	211	1578
1	279	1578
2	340	1578
3	403	1578
4	447	1578
5	474	1578
6	483	1578
7	486	1578

Stop Event

1×

saturated

Calls

Call 1

Inputs
(if (<=.f64 d #s(literal -4041992862284903/1757388200993436087035366604564836663620975436836686184804982645551499054949799949343375268009332366074187855716219099657503228927927460816018951242525454630912 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (if (<=.f64 d #s(literal -588125577493393/1508014301265110212210531135789433919262563062937126445449153766240405586123431823342743394534566435927056356253600209291203385124994765794776479899441737755548338772926974008712671009764769795099197087276523896072521861519103442867235119310387667688286379400732806098106007386857498456032472308789536403591243235328 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (if (<=.f64 d #s(literal 1750576880621669/32418090381882757488378186435087196492284736189394038281216072888208225089163344893747711319899248392876545989150787415487462117776654494592866209641515341305165482839074293153792 binary64)) (/.f64 (.f64 (/.f64 (.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 l)) (sqrt.f64 d)) (sqrt.f64 h)) (.f64 (.f64 (/.f64 d (neg.f64 (sqrt.f64 l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))))))
(if (<=.f64 d #s(literal -4041992862284903/1757388200993436087035366604564836663620975436836686184804982645551499054949799949343375268009332366074187855716219099657503228927927460816018951242525454630912 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (if (<=.f64 d #s(literal -588125577493393/1508014301265110212210531135789433919262563062937126445449153766240405586123431823342743394534566435927056356253600209291203385124994765794776479899441737755548338772926974008712671009764769795099197087276523896072521861519103442867235119310387667688286379400732806098106007386857498456032472308789536403591243235328 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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 d (neg.f64 (sqrt.f64 l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))))
(if (<=.f64 d #s(literal -2484628684844603/3450873173395281893717377931138512726225554486085193277581262111899648 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (if (<=.f64 d #s(literal -529724647327727/790633801981682102939434948120770730662330663141180149831645929794649763937481823796720248833738767559324522907487546528866440380413255769011771093518509804380927438580337349079948858367551626332967842494034160424070341732127705853976966233004529516956289283251401443563802400840744150516352841830648461966045733363646464 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (.f64 (.f64 (/.f64 d (neg.f64 (sqrt.f64 l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))))
(if (<=.f64 h #s(literal -76000000000000000724021481992061140531528544730317831335852607633665789371950169848116532755026577527738508721520073095770659275970372500669541273042944 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 h M) (.f64 #s(literal -1/4 binary64) D)) d) #s(literal 1 binary64))) (if (<=.f64 h #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (.f64 (.f64 (/.f64 d (neg.f64 (sqrt.f64 l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))))
(if (<=.f64 h #s(literal -76000000000000000724021481992061140531528544730317831335852607633665789371950169848116532755026577527738508721520073095770659275970372500669541273042944 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 h M) (.f64 #s(literal -1/4 binary64) D)) d) #s(literal 1 binary64))) (if (<=.f64 h #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (if (<=.f64 h #s(literal 14999999999999999109744362174945402931434968274539538955801723166263433274876584868500301420359925565079730475358653664960630721616341405846315274216049302947949695962233695148350639303557120 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 h M) (*.f64 #s(literal -1/4 binary64) D)) d) #s(literal 1 binary64))))))
(if (<=.f64 l #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))))
(if (<=.f64 d #s(literal -145000000000000002360709937705436087381839974975713407454312136704 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 (/.f64 d l) (neg.f64 h))) (sqrt.f64 (neg.f64 d)))) (if (<=.f64 d #s(literal -280000000000000016777216 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 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (/.f64 (sqrt.f64 (/.f64 h l)) (fabs.f64 l)))) (if (<=.f64 d #s(literal -7740736710071047/2037035976334486086268445688409378161051468393665936250636140449354381299763336706183397376 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 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 h d)))) (if (<=.f64 d #s(literal -5060056332683/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 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 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (/.f64 (sqrt.f64 (/.f64 h l)) (fabs.f64 l)))) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) 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 -1997919072202235/399583814440447005616844445413525287135820562261116307309972090832047582568929999375399181192126972308457847183540047730617340886948900519205142528 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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (.f64 l h))))) (.f64 l 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 0 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))))
(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 -1997919072202235/399583814440447005616844445413525287135820562261116307309972090832047582568929999375399181192126972308457847183540047730617340886948900519205142528 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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (.f64 l h))))) (.f64 l 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 0 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))))
(if (<=.f64 l #s(literal 8053665244183175/11505236063118821809467553221049758295155052665230762065499525194094891251552061640493342548634082305351687288311769174890162545204122663839542235560926343960177145179191391057683342054479750023644997308933440369205641643669917624414330439074612943178454432683813523087356623740062701843509462805095950344781824 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 3135285318820699/313528531882069915964662425689704934689422834087799421518938595239444503444259215719322355763768461419760165742407930953086580768238532773442734168210737755891992072530296122920016274326105279759841755136 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))

Outputs
(if (<=.f64 d #s(literal -4041992862284903/1757388200993436087035366604564836663620975436836686184804982645551499054949799949343375268009332366074187855716219099657503228927927460816018951242525454630912 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (if (<=.f64 d #s(literal -588125577493393/1508014301265110212210531135789433919262563062937126445449153766240405586123431823342743394534566435927056356253600209291203385124994765794776479899441737755548338772926974008712671009764769795099197087276523896072521861519103442867235119310387667688286379400732806098106007386857498456032472308789536403591243235328 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (if (<=.f64 d #s(literal 1750576880621669/32418090381882757488378186435087196492284736189394038281216072888208225089163344893747711319899248392876545989150787415487462117776654494592866209641515341305165482839074293153792 binary64)) (/.f64 (.f64 (/.f64 (.f64 (fma.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64))) (.f64 (/.f64 h l) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 d)) (sqrt.f64 l)) (sqrt.f64 d)) (sqrt.f64 h)) (.f64 (.f64 (/.f64 d (neg.f64 (sqrt.f64 l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))))))
(if (<=.f64 d #s(literal -4041992862284903/1757388200993436087035366604564836663620975436836686184804982645551499054949799949343375268009332366074187855716219099657503228927927460816018951242525454630912 binary64)) (.f64 (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (.f64 (.f64 (neg.f64 #s(literal 1/4 binary64)) D) (.f64 (/.f64 M d) h)) #s(literal 1 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -588125577493393/1508014301265110212210531135789433919262563062937126445449153766240405586123431823342743394534566435927056356253600209291203385124994765794776479899441737755548338772926974008712671009764769795099197087276523896072521861519103442867235119310387667688286379400732806098106007386857498456032472308789536403591243235328 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(approx (* (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d)))) (if (<=.f64 d #s(literal 1750576880621669/32418090381882757488378186435087196492284736189394038281216072888208225089163344893747711319899248392876545989150787415487462117776654494592866209641515341305165482839074293153792 binary64)) (/.f64 (.f64 (/.f64 (.f64 (sqrt.f64 d) (fma.f64 (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 h l)) #s(literal 1 binary64))) (sqrt.f64 l)) (sqrt.f64 d)) (sqrt.f64 h)) (.f64 (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (/.f64 (neg.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (.f64 (.f64 (neg.f64 #s(literal 1/4 binary64)) D) (.f64 (/.f64 M d) h)) #s(literal 1 binary64))))))
(if (<=.f64 d #s(literal -4041992862284903/1757388200993436087035366604564836663620975436836686184804982645551499054949799949343375268009332366074187855716219099657503228927927460816018951242525454630912 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (if (<=.f64 d #s(literal -588125577493393/1508014301265110212210531135789433919262563062937126445449153766240405586123431823342743394534566435927056356253600209291203385124994765794776479899441737755548338772926974008712671009764769795099197087276523896072521861519103442867235119310387667688286379400732806098106007386857498456032472308789536403591243235328 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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 d (neg.f64 (sqrt.f64 l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))))
(if (<=.f64 d #s(literal -4041992862284903/1757388200993436087035366604564836663620975436836686184804982645551499054949799949343375268009332366074187855716219099657503228927927460816018951242525454630912 binary64)) (.f64 (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (.f64 (.f64 (neg.f64 #s(literal 1/4 binary64)) D) (.f64 (/.f64 M d) h)) #s(literal 1 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -588125577493393/1508014301265110212210531135789433919262563062937126445449153766240405586123431823342743394534566435927056356253600209291203385124994765794776479899441737755548338772926974008712671009764769795099197087276523896072521861519103442867235119310387667688286379400732806098106007386857498456032472308789536403591243235328 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) #s(approx (* (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d)))) (.f64 (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (/.f64 (neg.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (.f64 (.f64 (neg.f64 #s(literal 1/4 binary64)) D) (*.f64 (/.f64 M d) h)) #s(literal 1 binary64)))))
(if (<=.f64 d #s(literal -2484628684844603/3450873173395281893717377931138512726225554486085193277581262111899648 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (if (<=.f64 d #s(literal -529724647327727/790633801981682102939434948120770730662330663141180149831645929794649763937481823796720248833738767559324522907487546528866440380413255769011771093518509804380927438580337349079948858367551626332967842494034160424070341732127705853976966233004529516956289283251401443563802400840744150516352841830648461966045733363646464 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (.f64 (.f64 (/.f64 d (neg.f64 (sqrt.f64 l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))))
(if (<=.f64 d #s(literal -2484628684844603/3450873173395281893717377931138512726225554486085193277581262111899648 binary64)) (.f64 (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (.f64 (.f64 (neg.f64 #s(literal 1/4 binary64)) D) (.f64 (/.f64 M d) h)) #s(literal 1 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))))) (if (<=.f64 d #s(literal -529724647327727/790633801981682102939434948120770730662330663141180149831645929794649763937481823796720248833738767559324522907487546528866440380413255769011771093518509804380927438580337349079948858367551626332967842494034160424070341732127705853976966233004529516956289283251401443563802400840744150516352841830648461966045733363646464 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (.f64 (.f64 (neg.f64 #s(literal 1/4 binary64)) D) (.f64 (/.f64 M d) h)) #s(literal 1 binary64))) (.f64 (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (/.f64 (neg.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (.f64 (.f64 (neg.f64 #s(literal 1/4 binary64)) D) (.f64 (/.f64 M d) h)) #s(literal 1 binary64)))))
(if (<=.f64 h #s(literal -76000000000000000724021481992061140531528544730317831335852607633665789371950169848116532755026577527738508721520073095770659275970372500669541273042944 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 h M) (.f64 #s(literal -1/4 binary64) D)) d) #s(literal 1 binary64))) (if (<=.f64 h #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (.f64 (.f64 (/.f64 d (neg.f64 (sqrt.f64 l))) (/.f64 #s(literal -1 binary64) (sqrt.f64 h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))))
(if (<=.f64 h #s(literal -76000000000000000724021481992061140531528544730317831335852607633665789371950169848116532755026577527738508721520073095770659275970372500669541273042944 binary64)) (.f64 (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (/.f64 (.f64 (.f64 #s(literal -1/4 binary64) D) (.f64 M h)) d) #s(literal 1 binary64)) (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))) (if (<=.f64 h #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (.f64 (.f64 (neg.f64 #s(literal 1/4 binary64)) D) (.f64 (/.f64 M d) h)) #s(literal 1 binary64))) (.f64 (.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 h)) (/.f64 (neg.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (.f64 (.f64 (neg.f64 #s(literal 1/4 binary64)) D) (.f64 (/.f64 M d) h)) #s(literal 1 binary64)))))
(if (<=.f64 h #s(literal -76000000000000000724021481992061140531528544730317831335852607633665789371950169848116532755026577527738508721520073095770659275970372500669541273042944 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 h M) (.f64 #s(literal -1/4 binary64) D)) d) #s(literal 1 binary64))) (if (<=.f64 h #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (if (<=.f64 h #s(literal 14999999999999999109744362174945402931434968274539538955801723166263433274876584868500301420359925565079730475358653664960630721616341405846315274216049302947949695962233695148350639303557120 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (/.f64 (.f64 (.f64 h M) (*.f64 #s(literal -1/4 binary64) D)) d) #s(literal 1 binary64))))))
(if (<=.f64 h #s(literal -76000000000000000724021481992061140531528544730317831335852607633665789371950169848116532755026577527738508721520073095770659275970372500669541273042944 binary64)) (.f64 (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (/.f64 (.f64 (.f64 #s(literal -1/4 binary64) D) (.f64 M h)) d) #s(literal 1 binary64)) (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))) (if (<=.f64 h #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (.f64 (.f64 (neg.f64 #s(literal 1/4 binary64)) D) (.f64 (/.f64 M d) h)) #s(literal 1 binary64))) (if (<=.f64 h #s(literal 14999999999999999109744362174945402931434968274539538955801723166263433274876584868500301420359925565079730475358653664960630721616341405846315274216049302947949695962233695148350639303557120 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (.f64 (.f64 (neg.f64 #s(literal 1/4 binary64)) D) (.f64 (/.f64 M d) h)) #s(literal 1 binary64))) (.f64 (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (/.f64 (.f64 (.f64 #s(literal -1/4 binary64) D) (.f64 M h)) d) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l)))))))
(if (<=.f64 l #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64))))
(if (<=.f64 l #s(literal -20240225330731/50600563326827654588123836679729326762389162441035529589225339506857584891998836722990095925359281123796769466079202977847452184346448369216753349985184627480379356069141590341116726935523304085309941919618186267140501870856173174654525838912289889085202514128089692388083353653807625633046581877161501565826926935273373696 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (.f64 (.f64 (neg.f64 #s(literal 1/4 binary64)) D) (.f64 (/.f64 M d) h)) #s(literal 1 binary64))) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (.f64 (.f64 (neg.f64 #s(literal 1/4 binary64)) D) (.f64 (/.f64 M d) h)) #s(literal 1 binary64))))
(if (<=.f64 d #s(literal -145000000000000002360709937705436087381839974975713407454312136704 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 (/.f64 d l) (neg.f64 h))) (sqrt.f64 (neg.f64 d)))) (if (<=.f64 d #s(literal -280000000000000016777216 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 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (/.f64 (sqrt.f64 (/.f64 h l)) (fabs.f64 l)))) (if (<=.f64 d #s(literal -7740736710071047/2037035976334486086268445688409378161051468393665936250636140449354381299763336706183397376 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 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 h d)))) (if (<=.f64 d #s(literal -5060056332683/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 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 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (.f64 M M) d)) (/.f64 (sqrt.f64 (/.f64 h l)) (fabs.f64 l)))) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) D) M) l) (neg.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) #s(literal 1 binary64)))))))
(if (<=.f64 d #s(literal -145000000000000002360709937705436087381839974975713407454312136704 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 (/.f64 (neg.f64 d) l) h)) (sqrt.f64 (neg.f64 d)))) (if (<=.f64 d #s(literal -280000000000000016777216 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 l)) (fabs.f64 l)) (.f64 (/.f64 (.f64 M M) d) (.f64 (.f64 D D) #s(literal 1/8 binary64))))) (if (<=.f64 d #s(literal -7740736710071047/2037035976334486086268445688409378161051468393665936250636140449354381299763336706183397376 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 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (sqrt.f64 (/.f64 h d)))) (if (<=.f64 d #s(literal -5060056332683/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 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 l)) (fabs.f64 l)) (.f64 (/.f64 (.f64 M M) d) (.f64 (.f64 D D) #s(literal 1/8 binary64))))) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 M (.f64 D (/.f64 #s(literal 1/2 binary64) d))) l) (.f64 (.f64 (neg.f64 #s(literal 1/4 binary64)) D) (.f64 (/.f64 M d) h)) #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 -1997919072202235/399583814440447005616844445413525287135820562261116307309972090832047582568929999375399181192126972308457847183540047730617340886948900519205142528 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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (.f64 l h))))) (.f64 l 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 0 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))))
(if (<=.f64 (.f64 (.f64 (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 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -1997919072202235/399583814440447005616844445413525287135820562261116307309972090832047582568929999375399181192126972308457847183540047730617340886948900519205142528 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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (.f64 (/.f64 (.f64 D D) d) (sqrt.f64 (.f64 l h))) (.f64 #s(literal -1/8 binary64) (.f64 M M)))) (.f64 l l))) (if (<=.f64 (.f64 (.f64 (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 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 0 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))))
(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 -1997919072202235/399583814440447005616844445413525287135820562261116307309972090832047582568929999375399181192126972308457847183540047730617340886948900519205142528 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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (.f64 (.f64 D D) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (.f64 l h))))) (.f64 l 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 0 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))))
(if (<=.f64 (.f64 (.f64 (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 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal -1997919072202235/399583814440447005616844445413525287135820562261116307309972090832047582568929999375399181192126972308457847183540047730617340886948900519205142528 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 (* l h))) (* (sqrt (/ (pow l 3) h)) d)) (.f64 (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (.f64 l h))) (.f64 #s(literal -1/8 binary64) (.f64 D D)))) (.f64 l l))) (if (<=.f64 (.f64 (.f64 (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 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))))) #s(literal 0 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 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 h d))))))
(if (<=.f64 l #s(literal 8053665244183175/11505236063118821809467553221049758295155052665230762065499525194094891251552061640493342548634082305351687288311769174890162545204122663839542235560926343960177145179191391057683342054479750023644997308933440369205641643669917624414330439074612943178454432683813523087356623740062701843509462805095950344781824 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 8053665244183175/11505236063118821809467553221049758295155052665230762065499525194094891251552061640493342548634082305351687288311769174890162545204122663839542235560926343960177145179191391057683342054479750023644997308933440369205641643669917624414330439074612943178454432683813523087356623740062701843509462805095950344781824 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 h) (sqrt.f64 l)))))
(if (<=.f64 l #s(literal 3135285318820699/313528531882069915964662425689704934689422834087799421518938595239444503444259215719322355763768461419760165742407930953086580768238532773442734168210737755891992072530296122920016274326105279759841755136 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(if (<=.f64 l #s(literal 3135285318820699/313528531882069915964662425689704934689422834087799421518938595239444503444259215719322355763768461419760165742407930953086580768238532773442734168210737755891992072530296122920016274326105279759841755136 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))

soundness1.8s (10.5%)

Memory

11.0MiB live, 1 523.4MiB allocated

Rules

8 470×	`lower-*.f64`
8 470×	`lower-*.f32`
8 012×	`lower-*.f64`
8 012×	`lower-*.f32`
7 446×	`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
0	85	421
0	128	395
1	383	392
2	2316	370
0	8343	362
0	233	16625
1	698	16107
2	2505	15973
3	5643	15878
0	8101	15560
0	88	420
0	150	402
1	443	382
2	3020	362
0	10011	362
0	22	72
0	38	68
1	124	67
2	828	67
0	8730	65
0	372	20249
1	1131	19535
2	4131	19396
3	7780	19348
0	8012	18892
0	67	318
0	104	298
1	325	291
2	2021	285
0	8421	281

Stop Event

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

Compiler

Compiled 4 794 to 1 862 computations (61.2% saved)

preprocess112.0ms (0.6%)

Memory: -6.6MiB live, 268.8MiB allocated
Compiler: Compiled 2 964 to 822 computations (72.3% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

start0.0ms (0%)

analyze432.0ms (2.5%)

sample6.1s (35.1%)

explain321.0ms (1.8%)

preprocess179.0ms (1%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify120.0ms (0.7%)

localize81.0ms (0.5%)

series68.0ms (0.4%)

simplify133.0ms (0.8%)

rewrite157.0ms (0.9%)

eval136.0ms (0.8%)

prune51.0ms (0.3%)

simplify138.0ms (0.8%)

localize232.0ms (1.3%)

series206.0ms (1.2%)

simplify257.0ms (1.5%)

rewrite211.0ms (1.2%)

eval352.0ms (2%)

prune395.0ms (2.3%)

simplify134.0ms (0.8%)

localize271.0ms (1.6%)

series276.0ms (1.6%)

simplify252.0ms (1.4%)

rewrite168.0ms (1%)

eval279.0ms (1.6%)

prune246.0ms (1.4%)

simplify128.0ms (0.7%)

localize301.0ms (1.7%)

series184.0ms (1.1%)

simplify250.0ms (1.4%)

rewrite588.0ms (3.4%)

eval370.0ms (2.1%)

prune255.0ms (1.5%)

regimes449.0ms (2.6%)

regimes67.0ms (0.4%)

regimes27.0ms (0.2%)

regimes87.0ms (0.5%)

regimes98.0ms (0.6%)

regimes30.0ms (0.2%)

regimes159.0ms (0.9%)

regimes90.0ms (0.5%)

regimes12.0ms (0.1%)

regimes140.0ms (0.8%)

regimes43.0ms (0.2%)

regimes14.0ms (0.1%)

bsearch236.0ms (1.4%)

bsearch7.0ms (0%)

bsearch135.0ms (0.8%)

bsearch100.0ms (0.6%)

bsearch16.0ms (0.1%)

bsearch106.0ms (0.6%)

bsearch258.0ms (1.5%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch50.0ms (0.3%)

bsearch62.0ms (0.4%)

simplify48.0ms (0.3%)

soundness1.8s (10.5%)

preprocess112.0ms (0.6%)

end0.0ms (0%)

Profiling