Metrics for Henrywood and Agarwal, Equation (12)

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze467.0ms (2.1%)

Memory

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

sample5.9s (26.8%)

Memory

45.9MiB live, 6 419.0MiB allocated

Samples

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

Precisions

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

ival-mult: 1.5s (39.4% of total)

ival-div: 1.1s (27.8% of total)

ival-pow: 873.0ms (22.4% of total)

ival-pow2: 235.0ms (6% of total)

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

exact: 21.0ms (0.5% of total)

ival-true: 15.0ms (0.4% of total)

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

Bogosity

explain367.0ms (1.7%)

Memory

-75.4MiB live, 647.9MiB allocated

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
69	-	3	(1.0572095557627771e-21 2.3557896159167367e-237 1.2188892484488805e+291 -5.398725958111146e-21 -3.0195295030762824e-291)	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
68	-	2	(-1.2235017494353184e-205 -2.948511799796381e+109 -1.2159752672200829e-233 -4.021038647294983e-154 -7.926359175981184e+274)	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
40	-	0	-	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`
25	-	1	(1.0572095557627771e-21 2.3557896159167367e-237 1.2188892484488805e+291 -5.398725958111146e-21 -3.0195295030762824e-291)	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`
22	-	0	-	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
0	-	0	-	`D`
0	-	0	-	`(*.f64 #s(literal 2 binary64) d)`
0	-	0	-	`(/.f64 h l)`
0	-	0	-	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`
0	-	0	-	`d`
0	-	0	-	`#s(literal 1 binary64)`
0	-	0	-	`(/.f64 d l)`
0	-	0	-	`(*.f64 M D)`
0	-	0	-	`(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))`
0	-	0	-	`(/.f64 d h)`
0	-	0	-	`(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))`
0	-	0	-	`#s(literal 2 binary64)`
0	-	0	-	`l`
0	-	0	-	`(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))`
0	-	0	-	`M`
0	-	0	-	`h`
0	-	0	-	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`pow.f64`	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	45	0
↳	`(/.f64 d l)`	overflow	45
`pow.f64`	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	36	0
↳	`(/.f64 d h)`	overflow	36
`pow.f64`	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	uflow-rescue	30	0
↳	`(/.f64 d h)`	underflow	30
`pow.f64`	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	uflow-rescue	21	0
↳	`(/.f64 d l)`	underflow	21
`*.f64`	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`	*uo**	13	0
↳	`(/.f64 d h)`	underflow	30
↳	`(/.f64 d l)`	underflow	21
↳	`(*.f64 (pow.f64 (/.f64 d 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	17
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	87
↳	`(.f64 (/.f64 #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	87
↳	`(/.f64 h l)`	overflow	35
↳	`(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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	94
↳	`(.f64 (.f64 (/.f64 #s(literal 1 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	94
↳	`(*.f64 M D)`	overflow	40
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	49
`/.f64`	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	o/n	12	0
↳	`(*.f64 M D)`	overflow	40
`*.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**	9	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))))`	*no**	8	0
`*.f64`	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`	*uo**	3	0
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	underflow	89
↳	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))`	underflow	89
↳	`(*.f64 M D)`	underflow	28
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	underflow	40
↳	`(/.f64 h l)`	overflow	35
`*.f64`	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`	*ou**	2	0
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	87
↳	`(.f64 (/.f64 #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	87
↳	`(*.f64 M D)`	overflow	40
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	49
↳	`(/.f64 h l)`	underflow	22
`*.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**	1	0

Confusion

	Predicted +	Predicted -
+	79	7
-	39	131

Precision

0.6694915254237288

Recall

0.9186046511627907

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	79	0	7
-	39	0	131

Precision?

0.6694915254237288

Recall?

0.9186046511627907

Freqs

test

number	freq
0	138
1	71
2	32
3	15

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

97.0ms

512×

valid

Compiler

Compiled 352 to 70 computations (80.1% saved)

Precisions

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

ival-div: 26.0ms (37.3% of total)

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

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

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

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

exact: 1.0ms (1.4% of total)

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

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

preprocess236.0ms (1.1%)

Memory

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

Symmetry

(abs D)

(abs M)

(sort M D)

Compiler

Compiled 40 to 22 computations (45% saved)

eval0.0ms (0%)

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

prune1.0ms (0%)

Memory

1.2MiB live, 1.2MiB allocated

Alt Table

Click to see full alt table

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

Status

Accuracy

Program

▶

67.8%

(*.f64 (*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 1 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 40 to 22 computations (45% saved)

simplify155.0ms (0.7%)

Memory

11.8MiB live, 238.1MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

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

localize72.0ms (0.3%)

Memory

-22.9MiB live, 86.4MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	5.696019384799371	(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))
accuracy	9.38006232500224	(.f64 (.f64 (/.f64 #s(literal 1 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	15.82677849023966	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	15.852105154798247	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

51.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-div: 10.0ms (31.3% of total)

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

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

ival-pow2: 2.0ms (6.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)

series40.0ms (0.2%)

Memory

16.6MiB live, 61.5MiB allocated

Counts

6 → 180

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

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

Calls

45 calls:

Time	Variable		Point	Expression
4.0ms	l	@	inf	(* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))
3.0ms	d	@	inf	(pow (/ (* M D) (* 2 d)) 2)
3.0ms	D	@	0	(pow (/ (* M D) (* 2 d)) 2)
2.0ms	h	@	0	(* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))
1.0ms	M	@	0	(pow (/ (* M D) (* 2 d)) 2)

simplify286.0ms (1.3%)

Memory

-13.4MiB live, 224.1MiB allocated

Algorithm

1×	egg-herbie

Rules

11 250×	`lower-*.f64`
11 250×	`lower-*.f32`
5 988×	`associate-r`
2 626×	`associate-*r/`
2 342×	`times-frac`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	34	1972
1	74	1940
2	256	1940
3	1182	1940
4	3310	1940
5	3542	1940
6	3631	1940
7	3657	1940
8	3674	1940
9	3680	1940
10	4767	1940
11	4837	1940
12	4846	1940
13	4846	1940
14	5742	1940
15	7259	1940
16	7277	1940
17	7277	1940
18	7277	1940
19	7277	1940
0	10737	1940

Stop Event

1×	iter limit
1×	node limit

Counts

180 → 180

Calls

Call 1

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

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

rewrite259.0ms (1.2%)

Memory

24.0MiB live, 354.8MiB allocated

Rules

4 926×	`lower-*.f32`
4 918×	`lower-*.f64`
2 258×	`lower-/.f32`
2 250×	`lower-/.f64`
1 626×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	19	42
0	32	40
1	94	40
2	515	40
3	5058	40
0	8121	40

Stop Event

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

Counts

6 → 610

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

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

eval130.0ms (0.6%)

Memory: -34.3MiB live, 152.2MiB allocated
Compiler: Compiled 30 783 to 3 503 computations (88.6% saved)

prune193.0ms (0.9%)

Memory

38.0MiB live, 280.1MiB allocated

Pruning

20 alts after pruning (20 fresh and 0 done)

	Pruned	Kept	Total
New	772	20	792
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	773	20	793

Accuracy

85.6%

Counts

793 → 20

Alt Table

Click to see full alt table

Status	Accuracy	Program
	67.5%	(.f64 (.f64 (pow.f64 (pow.f64 (/.f64 d h) #s(literal 1/8 binary64)) #s(literal 4 binary64)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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.9%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) d) (/.f64 (.f64 h #s(literal 1/2 binary64)) l)) d)))
	59.8%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (*.f64 d d) #s(literal 4 binary64))) l) h)))
▶	71.9%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
▶	64.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
	56.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 #s(literal 1/2 binary64)) l) M) (.f64 D (.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 d d) #s(literal 4 binary64))) (.f64 M D))))))
	59.6%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 (/.f64 (/.f64 M d) (/.f64 #s(literal 2 binary64) M)) (/.f64 (.f64 D #s(literal 1/2 binary64)) (/.f64 d D)))) (/.f64 h l))))
	52.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #s(approx (pow (/ (* M D) (* 2 d)) 2) (.f64 M (.f64 #s(literal 1/4 binary64) (.f64 M (.f64 D (/.f64 D (*.f64 d d)))))))) (/.f64 h l))))
▶	57.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	32.6%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
▶	38.6%	(.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 #s(literal 1 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.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	30.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (pow.f64 (.f64 (/.f64 d l) d) #s(literal 1/4 binary64)) (pow.f64 l #s(literal -1/4 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	32.6%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	67.8%	(.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))))
	35.3%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	41.8%	(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	67.9%	(.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.8%	(.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 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))))
	35.3%	(.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))

Compiler

Compiled 1 650 to 990 computations (40% saved)

simplify201.0ms (0.9%)

Memory

1.6MiB live, 288.3MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	384	(.f64 (.f64 (/.f64 #s(literal 1 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	4800	(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
cost-diff	5824	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff	384	(.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (*.f64 M M) #s(literal 1/4 binary64))))
cost-diff	704	(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff	5824	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff	5824	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff	384	(.f64 (.f64 (/.f64 #s(literal 1 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	4800	(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))
cost-diff	5824	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff	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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d 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)))
cost-diff	704	(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff	1088	(/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
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

9 134×	`lower-*.f32`
9 078×	`lower-*.f64`
1 938×	`lower-/.f32`
1 912×	`lower-/.f64`
1 858×	`distribute-rgt-neg-in`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	72	813
0	127	821
1	260	753
2	912	753
3	5167	753
0	8044	745

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

localize265.0ms (1.2%)

Memory

-0.9MiB live, 465.2MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	2.907094597642738	(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))
accuracy	3.4121618077788662	(.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 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))))
accuracy	5.56117500934369	(.f64 (.f64 (/.f64 #s(literal 1 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	8.865247945975508	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	4.411410024483171	(.f64 (/.f64 D d) (.f64 (*.f64 M M) #s(literal 1/4 binary64)))
accuracy	6.285736364592517	(.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (*.f64 M M) #s(literal 1/4 binary64))))
accuracy	8.865247945975508	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	9.828958518830559	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	2.907094597642738	(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))
accuracy	3.4121618077788662	(.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 #s(literal 1 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.56117500934369	(.f64 (.f64 (/.f64 #s(literal 1 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.828958518830559	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	4.248937436504287	(/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))
accuracy	5.109531052408119	(.f64 h (.f64 M M))
accuracy	8.865247945975508	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	9.828958518830559	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	3.3940097467989156	(/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
accuracy	3.4121618077788662	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
accuracy	8.865247945975508	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	9.828958518830559	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

82.0ms	143×	0	valid
56.0ms	113×	0	invalid

Compiler

Compiled 841 to 64 computations (92.4% saved)

Precisions

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

ival-mult: 42.0ms (44% of total)

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

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

ival-sub: 11.0ms (11.5% of total)

ival-sqrt: 4.0ms (4.2% of total)

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

exact: 1.0ms (1% of total)

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

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

series95.0ms (0.4%)

Memory

10.8MiB live, 188.0MiB allocated

Counts

15 → 648

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

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

Calls

162 calls:

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

simplify265.0ms (1.2%)

Memory

-32.2MiB live, 472.6MiB allocated

Algorithm

1×	egg-herbie

Rules

4 926×	`lower-*.f64`
4 926×	`lower-*.f32`
4 776×	`lower-fma.f64`
4 776×	`lower-fma.f32`
3 012×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	140	10800
1	389	10612
2	1389	10582
3	3030	10519
4	5007	10519
0	8073	10357

Stop Event

1×	iter limit
1×	node limit

Counts

648 → 648

Calls

Call 1

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

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

rewrite419.0ms (1.9%)

Memory

35.6MiB live, 357.9MiB allocated

Rules

6 716×	`lower-*.f32`
6 672×	`lower-*.f64`
4 152×	`lower-/.f32`
4 126×	`lower-/.f64`
2 328×	`lower--.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	69	245
0	121	249
1	386	217
2	3132	209
0	9268	206

Stop Event

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

Counts

15 → 622

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

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

eval380.0ms (1.7%)

Memory: 6.3MiB live, 318.3MiB allocated
Compiler: Compiled 73 486 to 3 217 computations (95.6% saved)

prune478.0ms (2.2%)

Memory

-2.0MiB live, 441.8MiB allocated

Pruning

37 alts after pruning (37 fresh and 0 done)

	Pruned	Kept	Total
New	1 959	36	1 995
Fresh	14	1	15
Picked	5	0	5
Done	0	0	0
Total	1 978	37	2 015

Accuracy

93.3%

Counts

2 015 → 37

Alt Table

Click to see full alt table

Status	Accuracy	Program
	33.8%	(fma.f64 (sqrt.f64 d) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (/.f64 d h))) (.f64 (neg.f64 (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (.f64 d #s(literal 2 binary64)))) h)) (/.f64 d (sqrt.f64 (.f64 l h)))))
	27.0%	(/.f64 (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 D (.f64 D #s(literal 1/8 binary64))) (.f64 h (.f64 M M))) (.f64 d (.f64 d l))))) (sqrt.f64 (.f64 (/.f64 d h) d))) (sqrt.f64 l))
	39.3%	(/.f64 (.f64 (sqrt.f64 d) (.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)))) (sqrt.f64 h))
	40.0%	(.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)))
	32.5%	(.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 D (.f64 D #s(literal 1/8 binary64))) (.f64 h (.f64 M M))) (.f64 d (*.f64 d l))))))
	60.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 (.f64 h #s(literal 1/2 binary64)) D) (.f64 d l)) (.f64 M (*.f64 M #s(literal 1/4 binary64)))) (/.f64 D d))))
	35.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)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	28.3%	(.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	44.0%	(.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 h (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d))) (.f64 l (.f64 #s(literal 2 binary64) (/.f64 d (.f64 M D)))))))
	41.9%	(.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 M D) (.f64 (.f64 d l) #s(literal 2 binary64))) (.f64 h (.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 M D) d))))))
▶	36.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
	38.6%	(.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 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (.f64 (/.f64 M d) (.f64 D #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 h l))))
	29.9%	(.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 h (.f64 M M)) (.f64 (.f64 D D) #s(literal 1/8 binary64))) (.f64 l (*.f64 d d))))))
	64.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
▶	57.2%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	28.2%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
▶	71.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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	64.3%	(.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
	67.8%	(.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))))
	2.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #s(approx (pow (/ d l) (/ 1 2)) (neg.f64 (sqrt.f64 (/.f64 d l))))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	37.3%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	29.5%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	44.6%	(.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l)))
	61.7%	(.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	41.6%	(.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	41.8%	(.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 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))))
	29.5%	(.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	49.8%	(.f64 (.f64 (sqrt.f64 (/.f64 d l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 D (.f64 D #s(literal 1/8 binary64))) (.f64 h (.f64 M M))) (.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 d h)))
	38.6%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	24.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 M M) d)) (.f64 #s(literal -1/8 binary64) (.f64 D D)))))
▶	15.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l)))
	24.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l))))) (*.f64 d (sqrt.f64 (/.f64 h l)))) h))
	16.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 M M) d)) (.f64 #s(literal -1/8 binary64) (*.f64 D D))))
	17.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (/.f64 (.f64 M M) d) (.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
	21.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
	25.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 l l))))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))))))
▶	31.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))

Compiler

Compiled 2 756 to 1 732 computations (37.2% saved)

simplify226.0ms (1%)

Memory

4.3MiB live, 243.3MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

8 112×	`lower-*.f32`
8 052×	`lower-*.f64`
3 066×	`lower-/.f32`
3 032×	`lower-/.f64`
1 634×	`associate-r`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	97	819
0	160	794
1	301	744
2	925	736
3	5986	736
0	8316	732

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

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

localize473.0ms (2.1%)

Memory

-21.6MiB live, 368.8MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	3.4121618077788662	(.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
accuracy	4.411410024483171	(.f64 (/.f64 D d) (.f64 (*.f64 M M) #s(literal 1/4 binary64)))
accuracy	6.285736364592517	(.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (*.f64 M M) #s(literal 1/4 binary64))))
accuracy	9.828958518830563	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	4.248937436504287	(/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))
accuracy	5.109531052408119	(.f64 h (.f64 M M))
accuracy	8.779891341557743	(sqrt.f64 (/.f64 l d))
accuracy	9.828958518830563	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	8.003140083925082	(.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))
accuracy	9.360509463764743	(sqrt.f64 (*.f64 h l))
accuracy	10.494912042539642	(sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h))
accuracy	14.19949312602084	(/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))
accuracy	0.13671875	(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
accuracy	0.6104862419021347	(/.f64 #s(literal 1 binary64) (*.f64 h l))
accuracy	8.982313895858377	(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
accuracy	17.10963593375873	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))
accuracy	3.3940097467989156	(/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
accuracy	3.4121618077788662	(.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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
accuracy	8.861341695975511	(sqrt.f64 (/.f64 d l))
accuracy	9.828958518830563	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

198.0ms	143×	0	valid
104.0ms	113×	0	invalid

Compiler

Compiled 767 to 83 computations (89.2% saved)

Precisions

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

ival-mult: 165.0ms (72.6% of total)

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

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

ival-sqrt: 10.0ms (4.4% of total)

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

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

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

exact: 1.0ms (0.4% of total)

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

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

series156.0ms (0.7%)

Memory

34.5MiB live, 122.9MiB allocated

Counts

25 → 1 032

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

Outputs
#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 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 (* (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 (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 (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 (* (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 0 M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<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 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<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 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<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 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<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 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<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 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<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 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<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 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<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 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf d) (#s(alt (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor -inf d) (#s(alt (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor 0 l) (#s(alt (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf l) (#s(alt (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ (pow l 3) h))) (taylor -inf l) (#s(alt (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 h) (#s(alt (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf h) (#s(alt (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #<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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 D) (#s(alt (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf D) (#s(alt (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf D) (#s(alt (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 M) (#s(alt (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor inf M) (#s(alt (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (taylor -inf M) (#s(alt (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) 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 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) (patch (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ (pow l 3) h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (patch (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d 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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* 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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d 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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.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 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d 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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d 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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d 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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d 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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 h) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 h) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 h) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 h) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf h) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf h) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf h) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf h) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf h) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf h) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf h) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf h) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 l) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 l) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 l) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 l) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf l) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf l) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf l) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf l) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf l) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf l) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf l) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf l) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 D) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 D) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 D) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 D) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf D) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf D) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf D) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf D) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf D) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf D) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf D) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf D) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 d) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 d) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 d) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 d) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf d) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf d) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf d) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf d) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf d) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf d) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf d) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf d) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 M) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 M) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 M) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 M) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf M) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf M) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf M) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf M) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf M) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf M) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf M) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf M) (#s(alt (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (patch (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.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 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) (patch (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d 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 (* (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 (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 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)) 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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (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 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (patch (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ l d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ l d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ l d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ l d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf D) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf d) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor 0 M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor inf M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (pow M 2)) d)) (taylor -inf M) (#s(alt (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) (patch (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/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))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D 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))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D 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))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D 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))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<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))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<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))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D 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))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 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 (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 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 (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D 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))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 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 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 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 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) (patch (.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d)))) #<representation binary64>) () ())) ())

Calls

258 calls:

Time	Variable		Point	Expression
41.0ms	M	@	inf	(/ (+ (* d (sqrt (/ (* l (* l l)) h))) (* (sqrt (* h l)) (* (* D D) (/ (* -1/8 (* M M)) d)))) (* l l))
14.0ms	D	@	0	(* (* D D) (/ (* -1/8 (* M M)) d))
2.0ms	d	@	0	(/ (+ (* d (sqrt (/ (* l (* l l)) h))) (* (sqrt (* h l)) (* (* D D) (/ (* -1/8 (* M M)) d)))) (* l l))
2.0ms	h	@	-inf	(/ (+ (* d (sqrt (/ (* l (* l l)) h))) (* (sqrt (* h l)) (* (* D D) (/ (* -1/8 (* M M)) d)))) (* l l))
1.0ms	D	@	0	(/ (+ (* d (sqrt (/ (* l (* l l)) h))) (* (sqrt (* h l)) (* (* D D) (/ (* -1/8 (* M M)) d)))) (* l l))

simplify314.0ms (1.4%)

Memory

-10.4MiB live, 358.3MiB allocated

Algorithm

1×	egg-herbie

Rules

6 082×	`lower-*.f64`
6 082×	`lower-*.f32`
5 250×	`lower-fma.f64`
5 250×	`lower-fma.f32`
3 258×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	207	16857
1	613	16369
2	2234	16289
3	4418	16179
0	8090	15903

Stop Event

1×	iter limit
1×	node limit

Counts

1 032 → 1 032

Calls

Call 1

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

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

rewrite335.0ms (1.5%)

Memory

53.6MiB live, 506.3MiB allocated

Rules

4 812×	`lower-*.f32`
4 758×	`lower-*.f64`
3 410×	`lower-/.f32`
3 376×	`lower-/.f64`
2 622×	`lower-pow.f32`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	97	442
0	160	420
1	497	373
2	3819	365
0	8763	365

Stop Event

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

Counts

25 → 833

Calls

Call 1

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

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

eval245.0ms (1.1%)

Memory: -58.5MiB live, 547.1MiB allocated
Compiler: Compiled 67 654 to 3 368 computations (95% saved)

prune631.0ms (2.8%)

Memory

39.5MiB live, 979.0MiB allocated

Pruning

58 alts after pruning (57 fresh and 1 done)

	Pruned	Kept	Total
New	1 935	42	1 977
Fresh	17	15	32
Picked	4	1	5
Done	0	0	0
Total	1 956	58	2 014

Accuracy

94.1%

Counts

2 014 → 58

Alt Table

Click to see full alt table

Status	Accuracy	Program
	61.5%	(/.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d #s(literal 2 binary64)) l) (.f64 d #s(literal 2 binary64)))) h)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
	23.9%	(.f64 (/.f64 (sqrt.f64 (.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	31.2%	(.f64 (/.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	24.5%	(.f64 (/.f64 (sqrt.f64 (.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	25.2%	(.f64 (/.f64 (sqrt.f64 (.f64 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (.f64 (neg.f64 h) (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	31.4%	(.f64 (/.f64 (sqrt.f64 (.f64 d #s(literal 1 binary64))) (sqrt.f64 (.f64 h (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	40.0%	(.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)))
	32.5%	(.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 D (.f64 D #s(literal 1/8 binary64))) (.f64 h (.f64 M M))) (.f64 d (*.f64 d l))))))
	47.1%	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l (.f64 (/.f64 d h) d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	42.7%	(.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d #s(literal 2 binary64)) l) (.f64 d #s(literal 2 binary64)))) h)) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))))
	35.7%	(.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 D D) (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (.f64 d (.f64 d l))))) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	35.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)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	28.3%	(.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	41.5%	(.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 h (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d))) (.f64 M D)) (.f64 (*.f64 d #s(literal 2 binary64)) l))))
	36.0%	(.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 h #s(literal 1/2 binary64)) D) (.f64 d l)) (.f64 M (*.f64 M #s(literal 1/4 binary64)))) (/.f64 D d))))
	38.6%	(.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 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (.f64 (/.f64 M d) (.f64 D #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 h l))))
	64.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
	57.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (/.f64 (/.f64 (.f64 (.f64 D D) (.f64 #s(literal 1/8 binary64) (.f64 h (*.f64 M M)))) d) l) d))))
	57.9%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 (.f64 h M) M)))) (.f64 d (*.f64 d l))))))
▶	58.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D))))
	28.2%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	71.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 M D) (.f64 d #s(literal 2 binary64))) l) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d)) h))))
	64.3%	(.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
	29.4%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	37.3%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	43.9%	(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	44.6%	(.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l)))
	61.7%	(.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	49.8%	(.f64 (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 D D) (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	41.6%	(.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	29.4%	(.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	57.4%	(.f64 (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	36.3%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
▶	71.9%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
▶	31.3%	(.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	28.7%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	24.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 M M) d)) (.f64 #s(literal -1/8 binary64) (.f64 D D)))))
	24.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (sqrt.f64 h)) (sqrt.f64 l) (.f64 d (.f64 l (sqrt.f64 (/.f64 l h))))) (.f64 l l)))
	27.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 (.f64 (sqrt.f64 (.f64 h l)) D) (/.f64 (.f64 D (.f64 #s(literal -1/8 binary64) (.f64 M M))) d) (.f64 d (.f64 l (sqrt.f64 (/.f64 l h))))) (.f64 l l)))
	28.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (/.f64 (fma.f64 d (.f64 l (sqrt.f64 (/.f64 l h))) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) l) l))
	21.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 #s(approx (+ (* d (sqrt (/ (* l (* l l)) h))) (* (sqrt (* h l)) (* (* D D) (/ (* -1/8 (* M M)) d)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 (.f64 D D) (.f64 (.f64 M M) (sqrt.f64 (.f64 l (.f64 h (.f64 h h)))))) (/.f64 #s(literal -1/8 binary64) d))) h)) (.f64 l l)))
	12.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 #s(approx (+ (* d (sqrt (/ (* l (* l l)) h))) (* (sqrt (* h l)) (* (* D D) (/ (* -1/8 (* M M)) d)))) (.f64 (.f64 M M) (.f64 (.f64 (.f64 D D) (sqrt.f64 (.f64 h l))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l)))
	5.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 #s(approx (+ (* d (sqrt (/ (* l (* l l)) h))) (* (sqrt (* h l)) (* (* D D) (/ (* -1/8 (* M M)) d)))) (.f64 (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (neg.f64 d))) (.f64 l l)))
	9.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 #s(approx (+ (* d (sqrt (/ (* l (* l l)) h))) (* (sqrt (* h l)) (* (* D D) (/ (* -1/8 (* M M)) d)))) (.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))))) (.f64 l l)))
▶	30.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l))))
	17.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (/.f64 (.f64 M M) d) (.f64 (*.f64 D D) #s(literal 1/8 binary64)))))
	21.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
	25.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 l l))))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))))))
	28.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 h))))
	29.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l))))
	3.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (sqrt.f64 (neg.f64 l)))))
	30.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 h l)))))
▶	31.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))))
	32.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l))))
✓	31.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))
	32.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) h)))))
	26.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))))
	29.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (exp.f64 (.f64 (log.f64 (*.f64 h l)) #s(literal -1/2 binary64)))))

Compiler

Compiled 3 770 to 2 362 computations (37.3% saved)

simplify273.0ms (1.2%)

Memory

-13.0MiB live, 266.5MiB 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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D))))
cost-diff	320	(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d))))
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	(*.f64 (/.f64 d h) d)
cost-diff	0	(sqrt.f64 (*.f64 (/.f64 d h) d))
cost-diff	0	(.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
cost-diff	320	(.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l)))
cost-diff	0	(sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l))))
cost-diff	0	(.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))
cost-diff	0	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))))
cost-diff	3264	(.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
cost-diff	0	(*.f64 h l)
cost-diff	0	(sqrt.f64 (*.f64 h l))
cost-diff	0	(/.f64 d (sqrt.f64 (*.f64 h l)))
cost-diff	0	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l))))
cost-diff	128	(-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))
cost-diff	320	(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (*.f64 d #s(literal 2 binary64)))
cost-diff	384	(/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l)
cost-diff	1088	(/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))

Rules

8 300×	`lower-*.f32`
8 254×	`lower-*.f64`
2 806×	`lower-/.f32`
2 778×	`lower-/.f64`
1 472×	`distribute-rgt-neg-in`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	86	771
0	137	737
1	254	683
2	736	683
3	4688	683
0	8119	679

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

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

localize332.0ms (1.5%)

Memory

24.7MiB live, 360.7MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	5.1095310524081174	(.f64 h (.f64 M M))
accuracy	5.620387433264029	(.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l))))
accuracy	8.779891341557743	(sqrt.f64 (/.f64 l d))
accuracy	9.82895851883056	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	3.6932478258030725	(.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))
accuracy	4.248937436504287	(/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))
accuracy	5.1095310524081174	(.f64 h (.f64 M M))
accuracy	11.787880865904773	(sqrt.f64 (*.f64 (/.f64 d h) d))
accuracy	0.28419877930532605	(.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))))
accuracy	0.6104862419021347	(/.f64 #s(literal 1 binary64) (*.f64 h l))
accuracy	8.982313895858377	(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
accuracy	17.10963593375873	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))))
accuracy	0	(*.f64 h l)
accuracy	0.12890625	(/.f64 d (sqrt.f64 (*.f64 h l)))
accuracy	9.360509463764743	(sqrt.f64 (*.f64 h l))
accuracy	17.10963593375873	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l))))
accuracy	3.3940097467989156	(/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
accuracy	3.4121618077788662	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
accuracy	8.861341695975511	(sqrt.f64 (/.f64 d l))
accuracy	9.82895851883056	(sqrt.f64 (/.f64 d h))

Samples

108.0ms	143×	0	valid
84.0ms	113×	0	invalid

Compiler

Compiled 668 to 69 computations (89.7% saved)

Precisions

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

ival-pow: 42.0ms (34.5% of total)

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

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

ival-sqrt: 12.0ms (9.8% of total)

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

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

exact: 1.0ms (0.8% of total)

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

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

series220.0ms (1%)

Memory

0.5MiB live, 179.1MiB allocated

Counts

30 → 1 104

Calls

Call 1

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

Outputs
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) (patch (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf M) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf D) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf d) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor 0 l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor inf l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) (* d l))) (taylor -inf l) (#s(alt (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (patch (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 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 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 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 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 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 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))) (patch (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 h l))) (patch (/.f64 d (sqrt.f64 (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 h l)) (patch (sqrt.f64 (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 h l) (patch (.f64 h l) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (patch (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h 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 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (patch (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) #<representation binary64>) () ())) ())
#s(alt (exp (* 1/4 (+ (log (/ 1 l)) (* -1 (log h))))) (taylor 0 h) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (exp (* 1/4 (+ (log (/ 1 l)) (* -1 (log h))))) (taylor 0 h) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (exp (* 1/4 (+ (log (/ 1 l)) (* -1 (log h))))) (taylor 0 h) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (exp (* 1/4 (+ (log (/ 1 l)) (* -1 (log h))))) (taylor 0 h) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (exp (* 1/4 (+ (log (/ 1 h)) (log (/ 1 l))))) (taylor inf h) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (exp (* 1/4 (+ (log (/ 1 h)) (log (/ 1 l))))) (taylor inf h) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (exp (* 1/4 (+ (log (/ 1 h)) (log (/ 1 l))))) (taylor inf h) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (exp (* 1/4 (+ (log (/ 1 h)) (log (/ 1 l))))) (taylor inf h) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (exp (* 1/4 (+ (log (/ -1 h)) (log (/ 1 l))))) (sqrt (sqrt -1))) (taylor -inf h) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (exp (* 1/4 (+ (log (/ -1 h)) (log (/ 1 l))))) (sqrt (sqrt -1))) (taylor -inf h) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (exp (* 1/4 (+ (log (/ -1 h)) (log (/ 1 l))))) (sqrt (sqrt -1))) (taylor -inf h) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (exp (* 1/4 (+ (log (/ -1 h)) (log (/ 1 l))))) (sqrt (sqrt -1))) (taylor -inf h) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (exp (* 1/4 (+ (log (/ 1 h)) (* -1 (log l))))) (taylor 0 l) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (exp (* 1/4 (+ (log (/ 1 h)) (* -1 (log l))))) (taylor 0 l) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (exp (* 1/4 (+ (log (/ 1 h)) (* -1 (log l))))) (taylor 0 l) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (exp (* 1/4 (+ (log (/ 1 h)) (* -1 (log l))))) (taylor 0 l) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (exp (* 1/4 (+ (log (/ 1 h)) (log (/ 1 l))))) (taylor inf l) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (exp (* 1/4 (+ (log (/ 1 h)) (log (/ 1 l))))) (taylor inf l) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (exp (* 1/4 (+ (log (/ 1 h)) (log (/ 1 l))))) (taylor inf l) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (exp (* 1/4 (+ (log (/ 1 h)) (log (/ 1 l))))) (taylor inf l) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (exp (* 1/4 (+ (log (/ -1 l)) (log (/ 1 h))))) (sqrt (sqrt -1))) (taylor -inf l) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (exp (* 1/4 (+ (log (/ -1 l)) (log (/ 1 h))))) (sqrt (sqrt -1))) (taylor -inf l) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (exp (* 1/4 (+ (log (/ -1 l)) (log (/ 1 h))))) (sqrt (sqrt -1))) (taylor -inf l) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (exp (* 1/4 (+ (log (/ -1 l)) (log (/ 1 h))))) (sqrt (sqrt -1))) (taylor -inf l) (#s(alt (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (patch (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 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 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.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 (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (patch (.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 h)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 h)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 h)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 h)))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 h))) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 h))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 h))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 h))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 h))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 d h) d)) (patch (sqrt.f64 (.f64 (/.f64 d h) d)) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf d) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor 0 h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor inf h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) d) #<representation binary64>) () ())) ())
#s(alt (/ (pow d 2) h) (taylor -inf h) (#s(alt (.f64 (/.f64 d h) d) (patch (.f64 (/.f64 d h) 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 (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 (* (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 (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 (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 (* (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 (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) #<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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) 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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* 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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) 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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) 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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) 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))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d 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 (* -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 (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 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 (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d 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 (* (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 (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 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)) 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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) 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 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<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 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<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 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<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 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<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 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<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 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<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 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<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 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<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 h l))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 h l)) (patch (/.f64 #s(literal 1 binary64) (.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf h) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor 0 M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor inf M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) h) (taylor -inf M) (#s(alt (.f64 h (.f64 M M)) (patch (.f64 h (.f64 M M)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) (patch (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor 0 D) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor 0 D) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor 0 D) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor 0 D) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor inf D) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor inf D) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor inf D) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor inf D) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor -inf D) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor -inf D) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor -inf D) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor -inf D) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor 0 h) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor 0 h) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor 0 h) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor 0 h) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor inf h) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor inf h) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor inf h) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor inf h) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor -inf h) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor -inf h) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor -inf h) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor -inf h) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor 0 M) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor 0 M) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor 0 M) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor 0 M) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor inf M) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor inf M) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor inf M) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor inf M) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor -inf M) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor -inf M) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor -inf M) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* (pow M 2) h))) (taylor -inf M) (#s(alt (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (patch (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ l d)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ l d)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ l d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ l d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ l d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ l d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) (patch (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) #<representation binary64>) () ())) ())

Calls

276 calls:

Time	Variable		Point	Expression
52.0ms	l	@	0	(sqrt (sqrt (/ 1 (* h l))))
37.0ms	d	@	inf	(* (/ d h) d)
21.0ms	d	@	-inf	(* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))))
21.0ms	h	@	0	(sqrt (sqrt (/ 1 (* h l))))
6.0ms	l	@	inf	(sqrt (sqrt (/ 1 (* h l))))

simplify296.0ms (1.3%)

Memory

3.1MiB live, 461.8MiB allocated

Algorithm

1×	egg-herbie

Rules

6 962×	`lower-*.f64`
6 962×	`lower-*.f32`
3 062×	`lower-/.f32`
3 062×	`lower-/.f64`
2 622×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	205	15177
1	568	14727
2	1935	14579
3	4658	14498
0	8133	14258

Stop Event

1×	iter limit
1×	node limit

Counts

1 104 → 1 104

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

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

rewrite419.0ms (1.9%)

Memory

7.0MiB live, 634.4MiB allocated

Rules

6 662×	`lower-*.f32`
6 620×	`lower-*.f64`
4 204×	`lower-/.f32`
4 176×	`lower-/.f64`
2 392×	`lower--.f32`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	86	446
0	137	391
1	428	348
2	2910	335
0	9442	335

Stop Event

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

Counts

30 → 1 122

Calls

Call 1

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

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

eval320.0ms (1.4%)

Memory: 67.0MiB live, 792.0MiB allocated
Compiler: Compiled 71 268 to 3 627 computations (94.9% saved)

prune541.0ms (2.4%)

Memory

15.9MiB live, 970.4MiB allocated

Pruning

58 alts after pruning (55 fresh and 3 done)

	Pruned	Kept	Total
New	2 487	31	2 518
Fresh	28	24	52
Picked	3	2	5
Done	0	1	1
Total	2 518	58	2 576

Accuracy

94.8%

Counts

2 576 → 58

Alt Table

Click to see full alt table

Status	Accuracy	Program
	34.4%	(/.f64 (.f64 (/.f64 d (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 (.f64 M M) (.f64 h #s(literal 1/8 binary64))) (.f64 D D)) (.f64 d (*.f64 d l)))))) (sqrt.f64 l))
	39.7%	(.f64 (/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D))))
	40.0%	(.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)))
	38.0%	(.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D))))
	35.7%	(.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 D D) (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M)))) (.f64 d (.f64 d l))))) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	38.6%	(.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 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (.f64 (/.f64 M d) (.f64 D #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 h l))))
	64.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
	64.3%	(.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 h #s(literal 1/2 binary64)) l) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
	29.4%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	44.6%	(.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l)))
	49.8%	(.f64 (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 (.f64 M M) (.f64 h #s(literal 1/8 binary64))) (.f64 D D)) (.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	41.6%	(.f64 (.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	29.4%	(.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	35.7%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	35.7%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (neg.f64 d)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	67.4%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 M (neg.f64 D)) (.f64 (.f64 d #s(literal 2 binary64)) l)) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d)) h) #s(literal 1 binary64)))
	68.3%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (.f64 (.f64 M D) (/.f64 #s(literal 1/2 binary64) (.f64 (/.f64 d h) #s(literal 2 binary64)))))))
	71.9%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d)) h))))
	67.3%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #s(approx (/ (/ ( 1/2 (* M D)) (* d 2)) (/ 1 h)) (.f64 #s(literal 1/4 binary64) (.f64 D (/.f64 (*.f64 M h) d)))))))
	61.7%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d #s(literal 2 binary64)) l) (*.f64 d #s(literal 2 binary64)))) h)))
	49.8%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (fma.f64 (.f64 D D) (.f64 (.f64 #s(literal -1/8 binary64) h) (/.f64 (.f64 M M) (.f64 d (.f64 d l)))) #s(literal 1 binary64))))
	27.2%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) #s(approx (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D (.f64 D (.f64 M (.f64 M h))))) (.f64 d (*.f64 d l)))))
	32.8%	(.f64 (.f64 (sqrt.f64 (.f64 (/.f64 d h) d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (/.f64 D d) (.f64 (.f64 M (.f64 M h)) (.f64 D #s(literal 1/8 binary64)))) (.f64 d l)))))
	28.7%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	24.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (.f64 (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 M M) d)) (.f64 #s(literal -1/8 binary64) (.f64 D D)))))
	24.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 (.f64 (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)) (sqrt.f64 h)) (sqrt.f64 l) (.f64 d (.f64 l (sqrt.f64 (/.f64 l h))))) (.f64 l l)))
	27.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 (.f64 (sqrt.f64 (.f64 h l)) D) (/.f64 (.f64 D (.f64 #s(literal -1/8 binary64) (.f64 M M))) d) (.f64 d (.f64 l (sqrt.f64 (/.f64 l h))))) (.f64 l l)))
	18.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (.f64 (.f64 M (/.f64 (.f64 M (.f64 D D)) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)))) (*.f64 l l)))
	28.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (/.f64 (fma.f64 d (.f64 l (sqrt.f64 (/.f64 l h))) (.f64 (sqrt.f64 (.f64 h l)) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) l) l))
	27.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l)))
	37.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))))
	13.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
	13.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
	14.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (.f64 (neg.f64 d) #s(literal 1 binary64))) (sqrt.f64 (.f64 (neg.f64 h) (/.f64 l d)))))
	21.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 d) (sqrt.f64 (*.f64 (/.f64 l d) h))))
	12.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 #s(approx (+ (* d (sqrt (/ (* l (* l l)) h))) (* (sqrt (* h l)) (* (* D D) (/ (* -1/8 (* M M)) d)))) (.f64 (.f64 M M) (.f64 (.f64 (.f64 D D) (sqrt.f64 (.f64 h l))) (/.f64 #s(literal -1/8 binary64) d)))) (*.f64 l l)))
	5.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 #s(approx (+ (* d (sqrt (/ (* l (* l l)) h))) (* (sqrt (* h l)) (* (* D D) (/ (* -1/8 (* M M)) d)))) (.f64 (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (neg.f64 d))) (.f64 l l)))
	9.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 #s(approx (+ (* d (sqrt (/ (* l (* l l)) h))) (* (sqrt (* h l)) (* (* D D) (/ (* -1/8 (* M M)) d)))) (.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))))) (.f64 l l)))
	30.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (.f64 (sqrt.f64 (sqrt.f64 (.f64 h l))) (sqrt.f64 (sqrt.f64 (*.f64 h l))))))
	28.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
	31.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 h l))))))
✓	30.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l))))
	26.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 h l) (*.f64 h l))))))
	30.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) d)))
	30.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
	27.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 (/.f64 #s(literal 1 binary64) l))))
	20.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (*.f64 D D)) d)))))
	37.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))))
	21.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
	25.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 h h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 h (.f64 l l))))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d))))))
	28.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 h))))
	3.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (sqrt.f64 (neg.f64 l)))))
	30.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 h l)))))
✓	31.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))))
	32.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l))))
✓	31.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))
	32.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) h)))))
	22.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))))

Compiler

Compiled 5 275 to 1 531 computations (71% saved)

regimes326.0ms (1.5%)

Memory

-22.0MiB live, 452.1MiB allocated

Counts

130 → 3

Calls

Call 1

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

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

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

Calls

7 calls:

76.0ms	h
42.0ms	M
40.0ms	(*.f64 M D)
40.0ms	l
40.0ms	D

Results

Accuracy	Segments	Branch
83.6%	3	`d`
84.5%	3	`h`
84.4%	3	`l`
71.9%	1	`M`
71.9%	1	`D`
75.8%	2	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
71.9%	1	`(*.f64 M D)`

Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes117.0ms (0.5%)

Memory

-25.0MiB live, 131.1MiB allocated

Counts

80 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

3 calls:

27.0ms	l
24.0ms	h
22.0ms	d

Results

Accuracy	Segments	Branch
82.1%	3	`d`
80.3%	2	`l`
82.9%	3	`h`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes86.0ms (0.4%)

Memory

6.6MiB live, 97.4MiB allocated

Counts

79 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

3 calls:

34.0ms	d
22.0ms	l
22.0ms	h

Results

Accuracy	Segments	Branch
77.4%	2	`l`
77.8%	2	`d`
80.0%	3	`h`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes28.0ms (0.1%)

Memory

-7.8MiB live, 48.3MiB allocated

Counts

77 → 2

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

22.0ms

Results

Accuracy	Segments	Branch
77.8%	2	`h`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes64.0ms (0.3%)

Memory

41.3MiB live, 87.7MiB allocated

Counts

68 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

21.0ms	d
19.0ms	h
19.0ms	l

Results

Accuracy	Segments	Branch
76.2%	2	`l`
76.2%	2	`d`
76.6%	2	`h`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes101.0ms (0.5%)

Memory

-3.7MiB live, 42.4MiB allocated

Counts

67 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

4 calls:

42.0ms	h
19.0ms	d
19.0ms	l
16.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
73.3%	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))))`
75.0%	2	`l`
77.3%	3	`d`
75.0%	2	`h`

Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes174.0ms (0.8%)

Memory

12.0MiB live, 192.5MiB allocated

Counts

64 → 4

Calls

Call 1

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

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

Calls

6 calls:

37.0ms	h
36.0ms	(*.f64 M D)
36.0ms	d
25.0ms	D
18.0ms	M

Results

Accuracy	Segments	Branch
64.2%	2	`M`
65.3%	2	`(*.f64 M D)`
65.3%	2	`D`
73.7%	3	`l`
75.6%	4	`h`
75.5%	4	`d`

Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes103.0ms (0.5%)

Memory

-5.7MiB live, 99.2MiB allocated

Counts

62 → 4

Calls

Call 1

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

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

Calls

4 calls:

36.0ms	h
31.0ms	d
17.0ms	l
15.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
69.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))))`
72.5%	4	`l`
73.6%	5	`d`
72.8%	5	`h`

Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes48.0ms (0.2%)

Memory

-29.2MiB live, 17.1MiB allocated

Counts

54 → 4

Calls

Call 1

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

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

Calls

1 calls:

44.0ms

Results

Accuracy	Segments	Branch
72.5%	4	`l`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes16.0ms (0.1%)

Memory

18.3MiB live, 18.3MiB allocated

Counts

44 → 4

Calls

Call 1

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

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

Calls

1 calls:

13.0ms

Results

Accuracy	Segments	Branch
72.2%	4	`l`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes29.0ms (0.1%)

Memory

-4.6MiB live, 40.7MiB allocated

Counts

38 → 4

Calls

Call 1

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

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

Calls

2 calls:

15.0ms	d
11.0ms	l

Results

Accuracy	Segments	Branch
65.9%	2	`d`
71.5%	4	`l`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes117.0ms (0.5%)

Memory

-74.0MiB live, 84.6MiB allocated

Counts

36 → 4

Calls

Call 1

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

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

Calls

6 calls:

37.0ms	h
35.0ms	d
11.0ms	D
11.0ms	l
11.0ms	(*.f64 M D)

Results

Accuracy	Segments	Branch
55.0%	3	`(*.f64 M D)`
46.1%	2	`D`
63.0%	2	`d`
58.5%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
64.6%	3	`h`
67.9%	4	`l`

Compiler

Compiled 72 to 48 computations (33.3% saved)

regimes48.0ms (0.2%)

Memory

27.1MiB live, 73.6MiB allocated

Counts

35 → 4

Calls

Call 1

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

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

Calls

4 calls:

14.0ms	h
11.0ms	l
11.0ms	d
10.0ms	M

Results

Accuracy	Segments	Branch
63.5%	5	`d`
57.5%	4	`h`
52.5%	2	`M`
62.0%	4	`l`

Compiler

Compiled 24 to 20 computations (16.7% saved)

regimes78.0ms (0.3%)

Memory

-6.7MiB live, 81.6MiB allocated

Counts

31 → 5

Calls

Call 1

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

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

Calls

4 calls:

30.0ms	h
27.0ms	l
9.0ms	d
8.0ms	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))

Results

Accuracy	Segments	Branch
48.1%	3	`h`
54.6%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
58.4%	5	`d`
52.3%	3	`l`

Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes39.0ms (0.2%)

Memory

2.7MiB live, 60.4MiB allocated

Counts

29 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

3 calls:

20.0ms

(*.f64 M D)

9.0ms

8.0ms

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

Results

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

Compiler

Compiled 54 to 33 computations (38.9% saved)

regimes72.0ms (0.3%)

Memory

3.0MiB live, 94.9MiB allocated

Counts

27 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

5 calls:

26.0ms	l
19.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))))
8.0ms	M
8.0ms	d
8.0ms	(*.f64 M D)

Results

Accuracy	Segments	Branch
43.9%	2	`(*.f64 M D)`
47.5%	3	`l`
48.6%	4	`d`
42.1%	2	`M`
49.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 66 to 43 computations (34.8% saved)

regimes35.0ms (0.2%)

Memory

-1.2MiB live, 46.4MiB allocated

Counts

13 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

5 calls:

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

Results

Accuracy	Segments	Branch
46.2%	3	`d`
46.4%	3	`l`
34.6%	2	`D`
43.7%	2	`h`
37.9%	2	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`

Compiler

Compiled 64 to 42 computations (34.4% saved)

regimes5.0ms (0%)

Memory

10.3MiB live, 10.3MiB allocated

Counts

11 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

4.0ms

Results

Accuracy	Segments	Branch
46.4%	3	`l`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes23.0ms (0.1%)

Memory

-32.5MiB live, 21.7MiB allocated

Counts

10 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

18.0ms	l
4.0ms	d

Results

Accuracy	Segments	Branch
44.5%	2	`d`
44.4%	2	`l`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes40.0ms (0.2%)

Memory

-10.7MiB live, 36.3MiB allocated

Counts

5 → 2

Calls

Call 1

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

Outputs

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

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

Calls

5 calls:

30.0ms	M
3.0ms	l
2.0ms	d
2.0ms	h
2.0ms	(*.f64 M D)

Results

Accuracy	Segments	Branch
31.6%	1	`M`
39.6%	2	`h`
31.6%	1	`(*.f64 M D)`
40.1%	2	`l`
40.1%	2	`d`

Compiler

Compiled 32 to 26 computations (18.8% saved)

regimes9.0ms (0%)

Memory

20.7MiB live, 20.7MiB allocated

Counts

4 → 2

Calls

Call 1

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

Outputs

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

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

Calls

4 calls:

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

Results

Accuracy	Segments	Branch
31.6%	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))))`
34.5%	2	`h`
35.3%	2	`l`
35.0%	2	`d`

Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes5.0ms (0%)

Memory

12.2MiB live, 12.2MiB allocated

Counts

2 → 2

Calls

Call 1

Inputs

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

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

Outputs

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

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

Calls

3 calls:

2.0ms	l
2.0ms	D
2.0ms	d

Results

Accuracy	Segments	Branch
30.5%	1	`D`
34.3%	2	`d`
34.6%	2	`l`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes17.0ms (0.1%)

Memory

-25.3MiB live, 21.3MiB allocated

Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts

1 → 1

Calls

Call 1

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

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

Calls

6 calls:

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

Results

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

Compiler

Compiled 72 to 48 computations (33.3% saved)

bsearch99.0ms (0.4%)

Memory

28.8MiB live, 211.2MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
53.0ms	2.9996298272905745e+70	2.0219259619607053e+74
37.0ms	-8.246555817097066e-307	-5.564444362579681e-308

Samples

38.0ms	224×	0	valid
34.0ms	210×	0	invalid

Compiler

Compiled 1 207 to 762 computations (36.9% saved)

Precisions

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

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

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

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

ival-sub: 6.0ms (10.4% of total)

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

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

exact: 0.0ms (0% of total)

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

bsearch82.0ms (0.4%)

Memory

-25.7MiB live, 80.7MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	2.9996298272905745e+70	2.0219259619607053e+74
75.0ms	-5.564444362579681e-308	4.996201511083917e-303

Samples

21.0ms	144×	0	valid
19.0ms	121×	0	invalid

Compiler

Compiled 1 465 to 924 computations (36.9% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch3.0ms (0%)

Memory

2.7MiB live, 2.7MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	2.9996298272905745e+70	2.0219259619607053e+74
1.0ms	-8.246555817097066e-307	-5.564444362579681e-308

Compiler

Compiled 1 165 to 738 computations (36.7% saved)

bsearch60.0ms (0.3%)

Memory

39.2MiB live, 113.4MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
55.0ms	2.3246982665959053e-287	1.0450481442017812e-283

Samples

19.0ms	128×	0	valid
16.0ms	111×	0	invalid

Compiler

Compiled 651 to 422 computations (35.2% saved)

Precisions

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

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

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

ival-pow: 7.0ms (26.4% of total)

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

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

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

exact: 0.0ms (0% of total)

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

bsearch83.0ms (0.4%)

Memory

9.0MiB live, 143.6MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
78.0ms	1.879898675938096e-292	5.51737689832496e-291

Samples

43.0ms	112×	0	valid
15.0ms	102×	0	invalid

Compiler

Compiled 582 to 380 computations (34.7% saved)

Precisions

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

ival-pow: 26.0ms (51.8% of total)

ival-mult: 13.0ms (25.9% of total)

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch171.0ms (0.8%)

Memory

17.8MiB live, 247.4MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
79.0ms	5.487507880728361e-307	1.977128195944305e-303
80.0ms	-2.402703272347846e-105	-6.196595935010114e-112

Samples

85.0ms	272×	0	valid
55.0ms	293×	0	invalid

Compiler

Compiled 1 147 to 744 computations (35.1% saved)

Precisions

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

ival-mult: 37.0ms (45.7% of total)

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

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

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

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

exact: 1.0ms (1.2% of total)

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

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

bsearch123.0ms (0.6%)

Memory

-2.7MiB live, 230.4MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	-5.564444362579681e-308	4.996201511083917e-303
60.0ms	-7.191719475550579e+174	-1.1274119956484941e+170
52.0ms	-1.9341102662008216e+254	-5.2103420412575965e+253

Samples

53.0ms	208×	0	valid
43.0ms	270×	0	invalid

Compiler

Compiled 1 652 to 1 056 computations (36.1% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch244.0ms (1.1%)

Memory

18.3MiB live, 395.4MiB allocated

Algorithm

3×	binary-search

Stop Event

1×	predicate-same
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
71.0ms	2.427177588282111e+61	1.664804261842067e+71
71.0ms	-1.0184398800865385e-297	2.464827511133545e-304
81.0ms	-1.3991159197200087e+199	-3.5037188964362435e+196

Samples

100.0ms	432×	0	valid
68.0ms	438×	0	invalid

Compiler

Compiled 2 003 to 1 279 computations (36.1% saved)

Precisions

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

ival-pow: 61.0ms (44.2% of total)

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

ival-div: 29.0ms (21% of total)

ival-pow2: 11.0ms (8% of total)

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

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

exact: 1.0ms (0.7% of total)

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

bsearch105.0ms (0.5%)

Memory

-33.6MiB live, 200.0MiB allocated

Algorithm

3×	binary-search

Stop Event

1×	predicate-same
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	2.427177588282111e+61	1.664804261842067e+71
1.0ms	-1.0184398800865385e-297	2.464827511133545e-304
90.0ms	-4.718129351289071e+182	-4.635948202239671e+168

Samples

48.0ms	220×	0	invalid
30.0ms	160×	0	valid

Compiler

Compiled 2 133 to 1 355 computations (36.5% saved)

Precisions

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

ival-div: 26.0ms (43.8% of total)

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

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

ival-sub: 6.0ms (10.1% of total)

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

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

exact: 0.0ms (0% of total)

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

bsearch313.0ms (1.4%)

Memory

21.0MiB live, 154.8MiB allocated

Algorithm

3×	binary-search

Stop Event

1×	predicate-same
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
45.0ms	2.427177588282111e+61	1.664804261842067e+71
1.0ms	-1.0184398800865385e-297	2.464827511133545e-304
260.0ms	-4.894578734338885e+237	-1.3672788590566922e+227

Samples

219.0ms	160×	0	valid
29.0ms	192×	0	invalid

Compiler

Compiled 1 953 to 1 255 computations (35.7% saved)

Precisions

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

ival-pow: 205.0ms (86.8% of total)

ival-div: 12.0ms (5.1% of total)

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch59.0ms (0.3%)

Memory

-23.5MiB live, 85.6MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
48.0ms	7.230304331013548e+99	1.02384205208054e+103
1.0ms	-1.0184398800865385e-297	2.464827511133545e-304
1.0ms	-4.894578734338885e+237	-1.3672788590566922e+227

Samples

20.0ms	128×	0	valid
11.0ms	81×	0	invalid

Compiler

Compiled 1 739 to 1 130 computations (35% saved)

Precisions

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

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

ival-pow: 7.0ms (29.1% of total)

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch15.0ms (0.1%)

Memory

35.3MiB live, 35.3MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	7.230304331013548e+99	1.02384205208054e+103
11.0ms	2.464827511133545e-304	2.8443611042299235e-304
1.0ms	-4.894578734338885e+237	-1.3672788590566922e+227

Samples

5.0ms	32×	0	valid
4.0ms	30×	0	invalid

Compiler

Compiled 1 125 to 742 computations (34% saved)

Precisions

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

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

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

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

ival-pow2: 1.0ms (14.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)

bsearch159.0ms (0.7%)

Memory

1.4MiB live, 325.4MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	7.230304331013548e+99	1.02384205208054e+103
70.0ms	-5.046424376651605e-280	-1.0184398800865385e-297
68.0ms	-6.402973825327319e+41	-2.6606424650143585e+35

Samples

65.0ms	348×	0	invalid
50.0ms	304×	0	valid

Compiler

Compiled 1 422 to 926 computations (34.9% saved)

Precisions

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

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

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

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

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

bsearch188.0ms (0.8%)

Memory

14.3MiB live, 295.5MiB allocated

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
73.0ms	3.678827826728713e-49	3.252822834838454e-45
1.0ms	5.487507880728361e-307	1.977128195944305e-303
57.0ms	-0.27588574342929983	-0.00020585474203707428
43.0ms	-8.799678193479291e+218	-6.85278787984106e+217

Samples

92.0ms	352×	0	valid
55.0ms	379×	0	invalid

Compiler

Compiled 1 421 to 926 computations (34.8% saved)

Precisions

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

ival-div: 62.0ms (52.8% of total)

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

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

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

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

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

exact: 1.0ms (0.9% of total)

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

bsearch1.0ms (0%)

Memory

0.9MiB live, 0.9MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	5.404924388509524e+205	3.791466928301673e+224
0.0ms	-inf	-1.550315954581029e+266

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch1.0ms (0%)

Memory

0.7MiB live, 0.7MiB allocated

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	5.404924388509524e+205	3.791466928301673e+224
0.0ms	-8.679132262097826e-216	0.0

Compiler

Compiled 43 to 30 computations (30.2% saved)

bsearch79.0ms (0.4%)

Memory

-41.3MiB live, 72.1MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
0.0ms	2.464827511133545e-304	2.8443611042299235e-304
74.0ms	-8.79276605140137e-158	-1.6922125878158816e-158

Samples

48.0ms	105×	0	invalid
20.0ms	96×	0	valid

Compiler

Compiled 315 to 214 computations (32.1% saved)

Precisions

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

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

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

ival-pow: 6.0ms (21.5% of total)

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

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

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

exact: 0.0ms (0% of total)

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

bsearch2.0ms (0%)

Memory

3.3MiB live, 3.3MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	-1.0184398800865385e-297	2.464827511133545e-304
1.0ms	-8.79276605140137e-158	-1.6922125878158816e-158

Compiler

Compiled 567 to 378 computations (33.3% saved)

bsearch37.0ms (0.2%)

Memory

-1.2MiB live, 45.1MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
35.0ms	1.6284088378186527e-138	2.506095542227144e-138

Samples

21.0ms	49×	0	invalid
10.0ms	64×	0	valid

Compiler

Compiled 163 to 118 computations (27.6% saved)

Precisions

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

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

ival-div: 4.0ms (14.7% of total)

ival-pow: 3.0ms (11% of total)

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

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

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

exact: 0.0ms (0% of total)

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

bsearch1.0ms (0%)

Memory

1.8MiB live, 1.8MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
0.0ms	1.6284088378186527e-138	2.506095542227144e-138

Compiler

Compiled 167 to 122 computations (26.9% saved)

bsearch1.0ms (0%)

Memory

2.4MiB live, 2.4MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	-8.79276605140137e-158	-1.6922125878158816e-158

Compiler

Compiled 223 to 156 computations (30% saved)

bsearch1.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
0.0ms	-8.79276605140137e-158	-1.6922125878158816e-158

Compiler

Compiled 211 to 144 computations (31.8% saved)

simplify57.0ms (0.3%)

Memory

29.8MiB live, 121.9MiB allocated

Algorithm

1×	egg-herbie

Rules

248×	`neg-mul-1_binary64`
222×	`*-commutative_binary64`
190×	`unsub-neg_binary64`
150×	`distribute-rgt-neg-in_binary64`
146×	`distribute-lft-neg-in_binary64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	285	3464
1	393	3464
2	483	3464
3	573	3464
4	658	3464
5	706	3464
6	885	3464
7	1153	3464
8	1159	3464

Stop Event

1×

saturated

Calls

Call 1

Inputs
(if (<=.f64 h #s(literal -5667263092604697/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 h #s(literal 52000000000000000706643610107742509843541415001000774449468683717705728 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l)))))
(if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 h #s(literal 52000000000000000706643610107742509843541415001000774449468683717705728 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l)))))
(if (<=.f64 h #s(literal -5667263092604697/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d)) h)))) (if (<=.f64 h #s(literal 52000000000000000706643610107742509843541415001000774449468683717705728 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l)))))
(if (<=.f64 h #s(literal 4028872363020365/171441377149802771351748007849600289689824769872885377191000062139256168179989779598911740610511337300415147666808503492029943245710770246975753241195177196862953084397187695766737193680997938270047266914448743599737311060278380280946648703137233006633139143642984674682566877306441990189395290689110016 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d)) h)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l))))
(if (<=.f64 h #s(literal 1348269851146737/5617791046444737211654078721215702292556178059194708039794690036179146118921905097897139916325235500660003558745981042426837180275450519452901482207483566386805246669527046414884444362538940441232908842252656430276192208823201965046059784704400851161354703458893321819998351435577491134526104885300757004288 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #s(approx (/ (/ ( 1/2 (* M D)) (* d 2)) (/ 1 h)) (.f64 #s(literal 1/4 binary64) (.f64 D (/.f64 (.f64 M h) d))))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l))))
(if (<=.f64 d #s(literal -3574144527577613/5415370496329716522614090203404460358274291162843391748379842930887932241807862544999950011922147613471467208908991351228465152 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 M (neg.f64 D)) (.f64 (.f64 d #s(literal 2 binary64)) l)) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d)) h) #s(literal 1 binary64))) (if (<=.f64 d #s(literal 6957577457438803/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) d))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l)))))
(if (<=.f64 h #s(literal -159999999999999989817393110042814683782811317241121177037431051573730500448843320782294191913391161247696562921750491079282410626645029371900356198550720088962907515243539817090061798998463972421661311582730610412438975332700795459858687515104784452419584 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) d))))) (if (<=.f64 h #s(literal -27999999999999999569321495946718580301261255869868972033940176007409316146286415168026375300479666061784283134483321936458479630543976148709736416217640815611809574657458176 binary64)) (.f64 (/.f64 (sqrt.f64 (.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l))))))
(if (<=.f64 l #s(literal -13799999999999999259385186900048594897478515617378400629064746053112455778844426397873730304451299172376995336144990085644422403704949813549514898371673101585213108477131907508093677568331986610683904 binary64)) (.f64 (/.f64 (sqrt.f64 (.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 l #s(literal -2024022533073/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 l #s(literal 499999999999999972661166934123722562854823285010623962332920807424 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (.f64 d #s(literal 2 binary64)))) h))) (.f64 (/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))))))
(if (<=.f64 l #s(literal -125000000000000001156068252486449805570776292707193326988440173579175813213514798663556863580312775817010234630542623642961724760777266404046734457914244839087493121213313094516736 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 l #s(literal -2024022533073/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 l #s(literal 499999999999999972661166934123722562854823285010623962332920807424 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (.f64 d #s(literal 2 binary64)))) h))) (.f64 (/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))))))
(if (<=.f64 l #s(literal -27000000000000000835379564666314305859605886384678351665901120796558283114965936797084072634888442024371240329407408297384169783487395592606356300035197014096445228769326355869770157406082474102651436810829200140171900823287631970304 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))) (if (<=.f64 l #s(literal -2024022533073/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 l #s(literal 499999999999999972661166934123722562854823285010623962332920807424 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (.f64 d #s(literal 2 binary64)))) h))) (.f64 (/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))))))
(if (<=.f64 l #s(literal -27000000000000000835379564666314305859605886384678351665901120796558283114965936797084072634888442024371240329407408297384169783487395592606356300035197014096445228769326355869770157406082474102651436810829200140171900823287631970304 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))) (if (<=.f64 l #s(literal -2024022533073/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 l #s(literal 4099999999999999968068408938729210446054836170041620037690002346069637833999235747988308433940869283840 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (.f64 d #s(literal 2 binary64)))) h))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l)))))))
(if (<=.f64 l #s(literal -27000000000000000835379564666314305859605886384678351665901120796558283114965936797084072634888442024371240329407408297384169783487395592606356300035197014096445228769326355869770157406082474102651436810829200140171900823287631970304 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))) (if (<=.f64 l #s(literal 6176826577981891/24707306311927565716857342128774085333197833223161879682238935306082805123046306993647507776054336486228891340858985829027076261887914242781617846672453431386903982455635542158748401823985988322905245077938567513252198179128990807936780194781391547404884040101606295111368825026273254703636026307207764436438929167613952 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 l #s(literal 4099999999999999968068408938729210446054836170041620037690002346069637833999235747988308433940869283840 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l)))))))
(if (<=.f64 l #s(literal -31000000000000001757761616363586060288 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))) (if (<=.f64 l #s(literal -6185214907532679/5890680864316836766447387249177476247119386964598150177535756899376584320794655559932591384900650140340063891615625817543763223144510803885845624607194288107610698331745992221533871131893632012106238622173921469033288521558997823700137184806201826907368669534112523820726591354912103343876844956209126576528293888 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) d))))) (if (<=.f64 l #s(literal 4099999999999999968068408938729210446054836170041620037690002346069637833999235747988308433940869283840 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l)))))))
(if (<=.f64 d #s(literal -850000000000000040865650226125872597002972641215790070965524725667078050200377735594630569159103218350168303161661512064560335385737587190002851855822878018270252281105169812182532415131981444257555872710247325406068736 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) d))))) (if (<=.f64 d #s(literal -1080863910568919/72057594037927936 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))) (if (<=.f64 d #s(literal 6957577457438803/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) d))))) (if (<=.f64 d #s(literal 2501166927128233/6582018229284824168619876730229402019930943462534319453394436096 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 M M) d)) (.f64 #s(literal -1/8 binary64) (.f64 D D)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) 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 100000000000000003889357755108838843130737249295202013334302382007691294289384896763079965607877701387326460311941213291353170611409437561654018367221268940354434586262616943544566455807655946219322240663552 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -7762590461503545/1552518092300708935148979488462502555256886017116696611139052038026050952686376886330878408828646477950487730697131073206171580044114814391444287275041181139204454976020849905550265285631598444825262999193716468750892846853816057856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 h l) (.f64 h 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 100000000000000003889357755108838843130737249295202013334302382007691294289384896763079965607877701387326460311941213291353170611409437561654018367221268940354434586262616943544566455807655946219322240663552 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l))))))
(if (<=.f64 l #s(literal -2287806213626217/61832600368276133515125630254911797508782837275302959978515764023224306276632966792579100265310761247399417856504034834837841258576687802491886538775473291979151693037174784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 l #s(literal 6176826577981891/24707306311927565716857342128774085333197833223161879682238935306082805123046306993647507776054336486228891340858985829027076261887914242781617846672453431386903982455635542158748401823985988322905245077938567513252198179128990807936780194781391547404884040101606295111368825026273254703636026307207764436438929167613952 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 h l) (.f64 h l)))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l))))))
(if (<=.f64 l #s(literal -2287806213626217/61832600368276133515125630254911797508782837275302959978515764023224306276632966792579100265310761247399417856504034834837841258576687802491886538775473291979151693037174784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 l #s(literal -2024022533073/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 h l) (.f64 h l)))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal 5530720771101321/3351951982485649274893506249551461531869841455148098344430890360930441007518386744200468574541725856922507964546621512713438470702986642486608412251521024 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal 1424579592556401/837987995621412318723376562387865382967460363787024586107722590232610251879596686050117143635431464230626991136655378178359617675746660621652103062880256 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))
(if (<=.f64 l #s(literal -2287806213626217/61832600368276133515125630254911797508782837275302959978515764023224306276632966792579100265310761247399417856504034834837841258576687802491886538775473291979151693037174784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))
(if (<=.f64 l #s(literal -2287806213626217/61832600368276133515125630254911797508782837275302959978515764023224306276632966792579100265310761247399417856504034834837841258576687802491886538775473291979151693037174784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l))))

Outputs
(if (<=.f64 h #s(literal -5667263092604697/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 h #s(literal 52000000000000000706643610107742509843541415001000774449468683717705728 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l)))))
(if (<=.f64 h #s(literal -5667263092604697/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (sqrt.f64 (/.f64 d l))) (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 (.f64 M D) #s(literal 1/2 binary64)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h))))) (if (<=.f64 h #s(literal 52000000000000000706643610107742509843541415001000774449468683717705728 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 (.f64 M D) #s(literal 1/2 binary64)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h)))) (.f64 (sqrt.f64 (/.f64 d l)) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 h (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) #s(literal 1/2 binary64))) (.f64 (.f64 d #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (*.f64 d l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l)))))
(if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (if (<=.f64 h #s(literal 52000000000000000706643610107742509843541415001000774449468683717705728 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l)))))
(if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 (.f64 M D) #s(literal 1/2 binary64)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h)))) (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))))) (if (<=.f64 h #s(literal 52000000000000000706643610107742509843541415001000774449468683717705728 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 (.f64 M D) #s(literal 1/2 binary64)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h)))) (.f64 (sqrt.f64 (/.f64 d l)) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 h (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) #s(literal 1/2 binary64))) (.f64 (.f64 d #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (*.f64 d l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l)))))
(if (<=.f64 h #s(literal -5667263092604697/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d)) h)))) (if (<=.f64 h #s(literal 52000000000000000706643610107742509843541415001000774449468683717705728 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l)))))
(if (<=.f64 h #s(literal -5667263092604697/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (.f64 h (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d))))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) (if (<=.f64 h #s(literal 52000000000000000706643610107742509843541415001000774449468683717705728 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 (.f64 M D) #s(literal 1/2 binary64)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) h)))) (.f64 (sqrt.f64 (/.f64 d l)) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 h (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) #s(literal 1/2 binary64))) (.f64 (.f64 d #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (*.f64 d l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l)))))
(if (<=.f64 h #s(literal 4028872363020365/171441377149802771351748007849600289689824769872885377191000062139256168179989779598911740610511337300415147666808503492029943245710770246975753241195177196862953084397187695766737193680997938270047266914448743599737311060278380280946648703137233006633139143642984674682566877306441990189395290689110016 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d)) h)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (*.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l))))
(if (<=.f64 h #s(literal 4028872363020365/171441377149802771351748007849600289689824769872885377191000062139256168179989779598911740610511337300415147666808503492029943245710770246975753241195177196862953084397187695766737193680997938270047266914448743599737311060278380280946648703137233006633139143642984674682566877306441990189395290689110016 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (.f64 h (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d))))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 h (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) #s(literal 1/2 binary64))) (.f64 (.f64 d #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (*.f64 d l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l))))
(if (<=.f64 h #s(literal 1348269851146737/5617791046444737211654078721215702292556178059194708039794690036179146118921905097897139916325235500660003558745981042426837180275450519452901482207483566386805246669527046414884444362538940441232908842252656430276192208823201965046059784704400851161354703458893321819998351435577491134526104885300757004288 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #s(approx (/ (/ ( 1/2 (* M D)) (* d 2)) (/ 1 h)) (.f64 #s(literal 1/4 binary64) (.f64 D (/.f64 (.f64 M h) d))))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l))))
(if (<=.f64 h #s(literal 1348269851146737/5617791046444737211654078721215702292556178059194708039794690036179146118921905097897139916325235500660003558745981042426837180275450519452901482207483566386805246669527046414884444362538940441232908842252656430276192208823201965046059784704400851161354703458893321819998351435577491134526104885300757004288 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) #s(approx (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h)) (.f64 #s(literal 1/4 binary64) (.f64 D (/.f64 (.f64 h M) d)))))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 h (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) #s(literal 1/2 binary64))) (.f64 (.f64 d #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (*.f64 d l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l))))
(if (<=.f64 d #s(literal -3574144527577613/5415370496329716522614090203404460358274291162843391748379842930887932241807862544999950011922147613471467208908991351228465152 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 d l))) (fma.f64 (/.f64 (.f64 M (neg.f64 D)) (.f64 (.f64 d #s(literal 2 binary64)) l)) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d)) h) #s(literal 1 binary64))) (if (<=.f64 d #s(literal 6957577457438803/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) d))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l)))))
(if (<=.f64 d #s(literal -3574144527577613/5415370496329716522614090203404460358274291162843391748379842930887932241807862544999950011922147613471467208908991351228465152 binary64)) (.f64 (fma.f64 (/.f64 (neg.f64 (.f64 M D)) (.f64 l (.f64 d #s(literal 2 binary64)))) (.f64 h (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d))) #s(literal 1 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) (if (<=.f64 d #s(literal 6957577457438803/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) d))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 h (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) #s(literal 1/2 binary64))) (.f64 (.f64 d #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 d l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l)))))
(if (<=.f64 h #s(literal -159999999999999989817393110042814683782811317241121177037431051573730500448843320782294191913391161247696562921750491079282410626645029371900356198550720088962907515243539817090061798998463972421661311582730610412438975332700795459858687515104784452419584 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) d))))) (if (<=.f64 h #s(literal -27999999999999999569321495946718580301261255869868972033940176007409316146286415168026375300479666061784283134483321936458479630543976148709736416217640815611809574657458176 binary64)) (.f64 (/.f64 (sqrt.f64 (.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (.f64 d #s(literal 2 binary64)))) h)) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l))))))
(if (<=.f64 h #s(literal -159999999999999989817393110042814683782811317241121177037431051573730500448843320782294191913391161247696562921750491079282410626645029371900356198550720088962907515243539817090061798998463972421661311582730610412438975332700795459858687515104784452419584 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) d))))) (if (<=.f64 h #s(literal -27999999999999999569321495946718580301261255869868972033940176007409316146286415168026375300479666061784283134483321936458479630543976148709736416217640815611809574657458176 binary64)) (.f64 (/.f64 (sqrt.f64 (.f64 d (/.f64 d (neg.f64 l)))) (sqrt.f64 (neg.f64 h))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))))) #s(approx ( (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (.f64 (.f64 (-.f64 #s(literal 1 binary64) (.f64 h (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) #s(literal 1/2 binary64))) (.f64 (.f64 d #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (*.f64 d l)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 h))) (/.f64 d (sqrt.f64 l))))))
(if (<=.f64 l #s(literal -13799999999999999259385186900048594897478515617378400629064746053112455778844426397873730304451299172376995336144990085644422403704949813549514898371673101585213108477131907508093677568331986610683904 binary64)) (.f64 (/.f64 (sqrt.f64 (.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 l #s(literal -2024022533073/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 l #s(literal 499999999999999972661166934123722562854823285010623962332920807424 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (.f64 d #s(literal 2 binary64)))) h))) (.f64 (/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))))))
(if (<=.f64 l #s(literal -13799999999999999259385186900048594897478515617378400629064746053112455778844426397873730304451299172376995336144990085644422403704949813549514898371673101585213108477131907508093677568331986610683904 binary64)) (.f64 (/.f64 (sqrt.f64 (.f64 d (/.f64 d (neg.f64 l)))) (sqrt.f64 (neg.f64 h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 l #s(literal -2024022533073/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))))) #s(approx ( (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (if (<=.f64 l #s(literal 499999999999999972661166934123722562854823285010623962332920807424 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 h (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) #s(literal 1/2 binary64))) (.f64 (.f64 d #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 d l)))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (.f64 (/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 D (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))))))))))
(if (<=.f64 l #s(literal -125000000000000001156068252486449805570776292707193326988440173579175813213514798663556863580312775817010234630542623642961724760777266404046734457914244839087493121213313094516736 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 l #s(literal -2024022533073/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 l #s(literal 499999999999999972661166934123722562854823285010623962332920807424 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (.f64 d #s(literal 2 binary64)))) h))) (.f64 (/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))))))
(if (<=.f64 l #s(literal -125000000000000001156068252486449805570776292707193326988440173579175813213514798663556863580312775817010234630542623642961724760777266404046734457914244839087493121213313094516736 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) (if (<=.f64 l #s(literal -2024022533073/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))))) #s(approx ( (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (if (<=.f64 l #s(literal 499999999999999972661166934123722562854823285010623962332920807424 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 h (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) #s(literal 1/2 binary64))) (.f64 (.f64 d #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 d l)))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (.f64 (/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 D (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))))))))))
(if (<=.f64 l #s(literal -27000000000000000835379564666314305859605886384678351665901120796558283114965936797084072634888442024371240329407408297384169783487395592606356300035197014096445228769326355869770157406082474102651436810829200140171900823287631970304 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))) (if (<=.f64 l #s(literal -2024022533073/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 l #s(literal 499999999999999972661166934123722562854823285010623962332920807424 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (.f64 d #s(literal 2 binary64)))) h))) (.f64 (/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))) D)))))))
(if (<=.f64 l #s(literal -27000000000000000835379564666314305859605886384678351665901120796558283114965936797084072634888442024371240329407408297384169783487395592606356300035197014096445228769326355869770157406082474102651436810829200140171900823287631970304 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (.f64 d (/.f64 d (neg.f64 l)))) (sqrt.f64 (neg.f64 h)))) (if (<=.f64 l #s(literal -2024022533073/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))))) #s(approx ( (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (if (<=.f64 l #s(literal 499999999999999972661166934123722562854823285010623962332920807424 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 h (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) #s(literal 1/2 binary64))) (.f64 (.f64 d #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 d l)))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (.f64 (/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 D (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (*.f64 d l)))))))))))
(if (<=.f64 l #s(literal -27000000000000000835379564666314305859605886384678351665901120796558283114965936797084072634888442024371240329407408297384169783487395592606356300035197014096445228769326355869770157406082474102651436810829200140171900823287631970304 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))) (if (<=.f64 l #s(literal -2024022533073/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 l #s(literal 4099999999999999968068408938729210446054836170041620037690002346069637833999235747988308433940869283840 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 M D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (.f64 (.f64 d l) #s(literal 2 binary64)) (.f64 d #s(literal 2 binary64)))) h))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l)))))))
(if (<=.f64 l #s(literal -27000000000000000835379564666314305859605886384678351665901120796558283114965936797084072634888442024371240329407408297384169783487395592606356300035197014096445228769326355869770157406082474102651436810829200140171900823287631970304 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (.f64 d (/.f64 d (neg.f64 l)))) (sqrt.f64 (neg.f64 h)))) (if (<=.f64 l #s(literal -2024022533073/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))))) #s(approx ( (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (if (<=.f64 l #s(literal 4099999999999999968068408938729210446054836170041620037690002346069637833999235747988308433940869283840 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 h (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) #s(literal 1/2 binary64))) (.f64 (.f64 d #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 d l)))))) (/.f64 d (sqrt.f64 (.f64 h l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l)))))))
(if (<=.f64 l #s(literal -27000000000000000835379564666314305859605886384678351665901120796558283114965936797084072634888442024371240329407408297384169783487395592606356300035197014096445228769326355869770157406082474102651436810829200140171900823287631970304 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h)))) (if (<=.f64 l #s(literal 6176826577981891/24707306311927565716857342128774085333197833223161879682238935306082805123046306993647507776054336486228891340858985829027076261887914242781617846672453431386903982455635542158748401823985988322905245077938567513252198179128990807936780194781391547404884040101606295111368825026273254703636026307207764436438929167613952 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l)))))) (if (<=.f64 l #s(literal 4099999999999999968068408938729210446054836170041620037690002346069637833999235747988308433940869283840 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l)))))))
(if (<=.f64 l #s(literal -27000000000000000835379564666314305859605886384678351665901120796558283114965936797084072634888442024371240329407408297384169783487395592606356300035197014096445228769326355869770157406082474102651436810829200140171900823287631970304 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (.f64 d (/.f64 d (neg.f64 l)))) (sqrt.f64 (neg.f64 h)))) (if (<=.f64 l #s(literal 6176826577981891/24707306311927565716857342128774085333197833223161879682238935306082805123046306993647507776054336486228891340858985829027076261887914242781617846672453431386903982455635542158748401823985988322905245077938567513252198179128990807936780194781391547404884040101606295111368825026273254703636026307207764436438929167613952 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (.f64 d l))))) #s(approx ( (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))) (if (<=.f64 l #s(literal 4099999999999999968068408938729210446054836170041620037690002346069637833999235747988308433940869283840 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 D (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l))))))) (/.f64 d (sqrt.f64 (.f64 h l)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l)))))))
(if (<=.f64 l #s(literal -31000000000000001757761616363586060288 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))) (if (<=.f64 l #s(literal -6185214907532679/5890680864316836766447387249177476247119386964598150177535756899376584320794655559932591384900650140340063891615625817543763223144510803885845624607194288107610698331745992221533871131893632012106238622173921469033288521558997823700137184806201826907368669534112523820726591354912103343876844956209126576528293888 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) d))))) (if (<=.f64 l #s(literal 4099999999999999968068408938729210446054836170041620037690002346069637833999235747988308433940869283840 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 h l))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l)))) D)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l)))))))
(if (<=.f64 l #s(literal -31000000000000001757761616363586060288 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))) (if (<=.f64 l #s(literal -6185214907532679/5890680864316836766447387249177476247119386964598150177535756899376584320794655559932591384900650140340063891615625817543763223144510803885845624607194288107610698331745992221533871131893632012106238622173921469033288521558997823700137184806201826907368669534112523820726591354912103343876844956209126576528293888 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) d))))) (if (<=.f64 l #s(literal 4099999999999999968068408938729210446054836170041620037690002346069637833999235747988308433940869283840 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 D (.f64 (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))) (/.f64 D (.f64 d (.f64 d l))))))) (/.f64 d (sqrt.f64 (.f64 h l)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l)))))))
(if (<=.f64 d #s(literal -850000000000000040865650226125872597002972641215790070965524725667078050200377735594630569159103218350168303161661512064560335385737587190002851855822878018270252281105169812182532415131981444257555872710247325406068736 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) d))))) (if (<=.f64 d #s(literal -1080863910568919/72057594037927936 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))) (if (<=.f64 d #s(literal 6957577457438803/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) d))))) (if (<=.f64 d #s(literal 2501166927128233/6582018229284824168619876730229402019930943462534319453394436096 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 M M) d)) (.f64 #s(literal -1/8 binary64) (.f64 D D)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l))))))))
(if (<=.f64 d #s(literal -850000000000000040865650226125872597002972641215790070965524725667078050200377735594630569159103218350168303161661512064560335385737587190002851855822878018270252281105169812182532415131981444257555872710247325406068736 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) d))))) (if (<=.f64 d #s(literal -1080863910568919/72057594037927936 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d)))) (if (<=.f64 d #s(literal 6957577457438803/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) d))))) (if (<=.f64 d #s(literal 2501166927128233/6582018229284824168619876730229402019930943462534319453394436096 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 M M) d)) (.f64 (.f64 D D) #s(literal -1/8 binary64)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l))))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) 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 100000000000000003889357755108838843130737249295202013334302382007691294289384896763079965607877701387326460311941213291353170611409437561654018367221268940354434586262616943544566455807655946219322240663552 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -inf.0 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 #s(literal 1/8 binary64) (.f64 M (/.f64 (.f64 M (.f64 D D)) 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 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal 100000000000000003889357755108838843130737249295202013334302382007691294289384896763079965607877701387326460311941213291353170611409437561654018367221268940354434586262616943544566455807655946219322240663552 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #s(literal -7762590461503545/1552518092300708935148979488462502555256886017116696611139052038026050952686376886330878408828646477950487730697131073206171580044114814391444287275041181139204454976020849905550265285631598444825262999193716468750892846853816057856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 h l) (.f64 h 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 100000000000000003889357755108838843130737249295202013334302382007691294289384896763079965607877701387326460311941213291353170611409437561654018367221268940354434586262616943544566455807655946219322240663552 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l))))))
(if (<=.f64 (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal -7762590461503545/1552518092300708935148979488462502555256886017116696611139052038026050952686376886330878408828646477950487730697131073206171580044114814391444287275041181139204454976020849905550265285631598444825262999193716468750892846853816057856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 h l) (.f64 h 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 h l) (.f64 (pow.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64)))))) #s(literal 100000000000000003889357755108838843130737249295202013334302382007691294289384896763079965607877701387326460311941213291353170611409437561654018367221268940354434586262616943544566455807655946219322240663552 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l))))))
(if (<=.f64 l #s(literal -2287806213626217/61832600368276133515125630254911797508782837275302959978515764023224306276632966792579100265310761247399417856504034834837841258576687802491886538775473291979151693037174784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 l #s(literal 6176826577981891/24707306311927565716857342128774085333197833223161879682238935306082805123046306993647507776054336486228891340858985829027076261887914242781617846672453431386903982455635542158748401823985988322905245077938567513252198179128990807936780194781391547404884040101606295111368825026273254703636026307207764436438929167613952 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 h l) (.f64 h l)))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l))))))
(if (<=.f64 l #s(literal -2287806213626217/61832600368276133515125630254911797508782837275302959978515764023224306276632966792579100265310761247399417856504034834837841258576687802491886538775473291979151693037174784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (if (<=.f64 l #s(literal 6176826577981891/24707306311927565716857342128774085333197833223161879682238935306082805123046306993647507776054336486228891340858985829027076261887914242781617846672453431386903982455635542158748401823985988322905245077938567513252198179128990807936780194781391547404884040101606295111368825026273254703636026307207764436438929167613952 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 h l) (.f64 h l)))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) h)) (sqrt.f64 l))))))
(if (<=.f64 l #s(literal -2287806213626217/61832600368276133515125630254911797508782837275302959978515764023224306276632966792579100265310761247399417856504034834837841258576687802491886538775473291979151693037174784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 l #s(literal -2024022533073/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 h l) (.f64 h l)))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -2287806213626217/61832600368276133515125630254911797508782837275302959978515764023224306276632966792579100265310761247399417856504034834837841258576687802491886538775473291979151693037174784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (if (<=.f64 l #s(literal -2024022533073/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 h l) (.f64 h l)))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))
(if (<=.f64 d #s(literal 5530720771101321/3351951982485649274893506249551461531869841455148098344430890360930441007518386744200468574541725856922507964546621512713438470702986642486608412251521024 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal 5530720771101321/3351951982485649274893506249551461531869841455148098344430890360930441007518386744200468574541725856922507964546621512713438470702986642486608412251521024 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))
(if (<=.f64 d #s(literal 1424579592556401/837987995621412318723376562387865382967460363787024586107722590232610251879596686050117143635431464230626991136655378178359617675746660621652103062880256 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))
(if (<=.f64 d #s(literal 1424579592556401/837987995621412318723376562387865382967460363787024586107722590232610251879596686050117143635431464230626991136655378178359617675746660621652103062880256 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))
(if (<=.f64 l #s(literal -2287806213626217/61832600368276133515125630254911797508782837275302959978515764023224306276632966792579100265310761247399417856504034834837841258576687802491886538775473291979151693037174784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))))
(if (<=.f64 l #s(literal -2287806213626217/61832600368276133515125630254911797508782837275302959978515764023224306276632966792579100265310761247399417856504034834837841258576687802491886538775473291979151693037174784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ (* M D) (* d 2)) l) (/ (/ (* 1/2 (* M D)) (* d 2)) (/ 1 h))))) (/.f64 d (sqrt.f64 (*.f64 h l))))

soundness3.6s (16%)

Memory

-13.6MiB live, 2 376.5MiB allocated

Rules

11 250×	`lower-*.f64`
11 250×	`lower-*.f32`
6 962×	`lower-*.f64`
6 962×	`lower-*.f32`
6 716×	`lower-*.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	69	245
0	121	249
1	386	217
2	3132	209
0	9268	206
0	34	1972
1	74	1940
2	256	1940
3	1182	1940
4	3310	1940
5	3542	1940
6	3631	1940
7	3657	1940
8	3674	1940
9	3680	1940
10	4767	1940
11	4837	1940
12	4846	1940
13	4846	1940
14	5742	1940
15	7259	1940
16	7277	1940
17	7277	1940
18	7277	1940
19	7277	1940
0	10737	1940
0	207	16857
1	613	16369
2	2234	16289
3	4418	16179
0	8090	15903
0	140	10800
1	389	10612
2	1389	10582
3	3030	10519
4	5007	10519
0	8073	10357
0	205	15177
1	568	14727
2	1935	14579
3	4658	14498
0	8133	14258
0	19	42
0	32	40
1	94	40
2	515	40
3	5058	40
0	8121	40
0	86	446
0	137	391
1	428	348
2	2910	335
0	9442	335
0	97	442
0	160	420
1	497	373
2	3819	365
0	8763	365

Stop Event

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

Compiler

Compiled 10 711 to 4 237 computations (60.4% saved)

preprocess148.0ms (0.7%)

Memory

23.4MiB live, 252.3MiB allocated

Remove

(sort M D)

(abs M)

(abs D)

Compiler

Compiled 4 484 to 828 computations (81.5% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated