Metrics for Henrywood and Agarwal, Equation (12)

start0.0ms (0%)

Memory: 0.1MiB live, 0.0MiB allocated

analyze456.0ms (2.1%)

Memory

39.6MiB live, 857.8MiB allocated

Algorithm

1×

Search

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

Compiler

Compiled 37 to 24 computations (35.1% saved)

sample6.3s (28.2%)

Memory

-73.2MiB live, 6 368.1MiB allocated

Samples

2.9s	13 201×	0	invalid
1.8s	8 256×	0	valid

Precisions

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

ival-div: 1.3s (35.7% of total)

ival-mult: 1.2s (32.5% of total)

ival-pow: 743.0ms (20.3% of total)

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

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

exact: 25.0ms (0.7% of total)

ival-true: 22.0ms (0.6% of total)

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

Bogosity

explain403.0ms (1.8%)

Memory

49.7MiB live, 707.0MiB allocated

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
66	-	3	(1.0350218715111036e-125 2.084716975761275e+187 2.3568720079176045e-197 2.0622586812895055e-169 -1.7269933046328953e-59)	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
55	-	1	(4.872329439988951e-267 1.5131668119753606e-121 3.331208279110242e+55 441467021740049340.0 7.678120151394084e-264)	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
40	-	1	(1.6785120785822745e+220 1.2795510660503272e-20 9.35911731763499e-92 -9.754223001106157e+199 5.08972976473024e-135)	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`
22	-	2	(6.929640304120862e-41 1.496580911562459e+94 4.4498564170573396e+98 5.081023703705116e-140 5.046244616845119e-177)	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`
21	-	1	(-2.2836890561680267e-271 -1.6007260719436604e-112 -6.61320763810371e+204 -3.9936598028137843e+211 -1.438282959301552e-196)	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 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 h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	35	0
↳	`(/.f64 d h)`	overflow	35
`pow.f64`	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	34	0
↳	`(/.f64 d l)`	overflow	34
`pow.f64`	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	uflow-rescue	28	0
↳	`(/.f64 d h)`	underflow	28
`pow.f64`	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	uflow-rescue	20	0
↳	`(/.f64 d l)`	underflow	20
`*.f64`	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`	*no**	19	0
`*.f64`	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`	*no**	11	0
`/.f64`	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	o/n	10	0
↳	`(*.f64 M D)`	overflow	26
`*.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**	8	0
↳	`(/.f64 d h)`	underflow	28
↳	`(/.f64 d l)`	underflow	20
↳	`(*.f64 (pow.f64 (/.f64 d 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	12
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	66
↳	`(.f64 (/.f64 #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	66
↳	`(/.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	69
↳	`(.f64 (.f64 (/.f64 #s(literal 1 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	69
↳	`(*.f64 M D)`	overflow	26
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	32
`*.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
`/.f64`	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	u/n	1	0
↳	`(*.f64 M D)`	underflow	36

Confusion

	Predicted +	Predicted -
+	82	8
-	43	123

Precision

0.656

Recall

0.9111111111111111

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	82	0	8
-	43	0	123

Precision?

0.656

Recall?

0.9111111111111111

Freqs

test

number	freq
0	131
1	88
2	32
3	5

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

137.0ms

512×

valid

Compiler

Compiled 352 to 70 computations (80.1% saved)

Precisions

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

ival-div: 55.0ms (53.8% of total)

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

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

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

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

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

exact: 1.0ms (1% of total)

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

preprocess227.0ms (1%)

Memory

-16.8MiB live, 278.5MiB allocated

Algorithm

1×	egg-herbie

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Calls

Call 1

Inputs

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

Outputs

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

(*.f64 (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.7MiB live, 1.7MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	65.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 #s(literal 1 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

▶

65.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 #s(literal 1 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)

simplify154.0ms (0.7%)

Memory

3.0MiB live, 230.4MiB 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.3MiB live, 107.5MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	5.091690100213678	(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))
accuracy	9.219696077595572	(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
accuracy	13.015318422645947	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	15.263331644422065	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

48.0ms

256×

valid

Compiler

Compiled 156 to 24 computations (84.6% saved)

Precisions

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

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

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

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

ival-pow2: 3.0ms (9.2% 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)

series79.0ms (0.4%)

Memory

18.0MiB live, 55.8MiB 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
44.0ms	l	@	inf	(* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))
2.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	l	@	0	(* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))
1.0ms	M	@	0	(pow (/ (* M D) (* 2 d)) 2)

simplify296.0ms (1.3%)

Memory

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

rewrite243.0ms (1.1%)

Memory

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

eval178.0ms (0.8%)

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

prune172.0ms (0.8%)

Memory

-22.3MiB live, 358.1MiB allocated

Pruning

23 alts after pruning (23 fresh and 0 done)

	Pruned	Kept	Total
New	769	23	792
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	770	23	793

Accuracy

88.4%

Counts

793 → 23

Alt Table

Click to see full alt table

Status	Accuracy	Program
	65.8%	(.f64 (.f64 (pow.f64 (pow.f64 (/.f64 d h) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	66.2%	(.f64 (.f64 (pow.f64 (/.f64 h d) #s(literal -1/2 binary64)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	65.8%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (pow.f64 (/.f64 d l) #s(literal 1/4 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
▶	57.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 M (.f64 D (.f64 M D))) (.f64 h #s(literal 1/2 binary64))) (.f64 (*.f64 d d) #s(literal 4 binary64))) l)))
	62.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 (.f64 D (.f64 M D))) #s(literal 1/4 binary64)) d) (/.f64 (.f64 h #s(literal 1/2 binary64)) l)) d)))
	55.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 h #s(literal 1/2 binary64)) l) (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal 1/4 binary64))) (*.f64 d d))))
	59.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 D) (.f64 #s(literal 1/2 binary64) (.f64 M D))) (.f64 (*.f64 d d) #s(literal 4 binary64))) l) h)))
▶	71.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 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	65.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 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)))))
	64.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) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
	66.7%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (.f64 (/.f64 M (.f64 d #s(literal 2 binary64))) D) #s(literal 2 binary64))) (/.f64 h l))))
	59.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 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)))))
▶	54.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	33.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	37.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 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
▶	66.6%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.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))))
▶	37.3%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 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))))
	33.5%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.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))))
	65.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 #s(literal 1 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.4%	(.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) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	36.2%	(.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))))
	40.1%	(.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))))
	66.2%	(.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))))

Compiler

Compiled 1 868 to 1 116 computations (40.3% saved)

simplify242.0ms (1.1%)

Memory

27.2MiB live, 379.2MiB 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 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	384	(/.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)
cost-diff	704	(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff	5824	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff	5824	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
cost-diff	0	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 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

8 554×	`lower-*.f32`
8 496×	`lower-*.f64`
3 452×	`lower-/.f32`
3 424×	`lower-/.f64`
1 570×	`associate-r`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	74	830
0	131	836
1	262	758
2	952	758
3	7017	758
0	8541	750

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

localize280.0ms (1.3%)

Memory

2.3MiB live, 683.1MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	2.20298729778943	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 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))))
accuracy	2.9841306152084894	(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))
accuracy	3.7978680127215623	(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
accuracy	7.711219048655512	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	2.9841306152084894	(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))
accuracy	3.7978680127215623	(.f64 (.f64 (/.f64 #s(literal 1 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	6.070947406882012	(sqrt.f64 (/.f64 l d))
accuracy	7.711219048655512	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	2.7854353726590215	(.f64 (.f64 M (.f64 D (.f64 M D))) (*.f64 h #s(literal 1/2 binary64)))
accuracy	6.87032536309637	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	6.881536080220448	(/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal 1/2 binary64))) (.f64 (*.f64 d d) #s(literal 4 binary64)))
accuracy	7.711219048655512	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	3.281639142886468	(.f64 h (.f64 M M))
accuracy	6.57803750792898	(/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))
accuracy	6.87032536309637	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	7.711219048655512	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	2.9841306152084894	(/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))
accuracy	3.189598342090931	(/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
accuracy	6.87032536309637	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	7.711219048655512	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

79.0ms	130×	0	valid
73.0ms	126×	0	invalid

Compiler

Compiled 858 to 66 computations (92.3% saved)

Precisions

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

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

ival-div: 37.0ms (36.7% of total)

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

ival-sqrt: 5.0ms (5% of total)

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

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

exact: 1.0ms (1% of total)

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

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

series129.0ms (0.6%)

Memory

16.8MiB live, 160.3MiB allocated

Counts

16 → 636

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

Calls

159 calls:

Time	Variable		Point	Expression
14.0ms	l	@	-inf	(* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 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))))
3.0ms	d	@	inf	(* (* (pow (/ d h) (/ 1 2)) (* (/ 1 (sqrt l)) (sqrt d))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))))
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))))

simplify254.0ms (1.1%)

Memory

15.0MiB live, 348.1MiB allocated

Algorithm

1×	egg-herbie

Rules

7 230×	`lower-fma.f64`
7 230×	`lower-fma.f32`
5 972×	`lower-*.f64`
5 972×	`lower-*.f32`
2 802×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	135	9127
1	361	9000
2	1257	8983
3	2789	8951
4	5145	8951
0	8524	8870

Stop Event

1×	iter limit
1×	node limit

Counts

636 → 636

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

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

rewrite284.0ms (1.3%)

Memory

-6.9MiB live, 330.5MiB allocated

Rules

4 686×	`lower-/.f32`
4 662×	`lower-/.f64`
3 966×	`lower-*.f32`
3 920×	`lower-*.f64`
1 356×	`lower-fma.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	65	213
0	113	208
1	340	189
2	2263	185
0	8323	184

Stop Event

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

Counts

16 → 883

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

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

eval374.0ms (1.7%)

Memory: -10.9MiB live, 586.3MiB allocated
Compiler: Compiled 87 712 to 4 730 computations (94.6% saved)

prune367.0ms (1.7%)

Memory

5.2MiB live, 762.3MiB allocated

Pruning

39 alts after pruning (39 fresh and 0 done)

	Pruned	Kept	Total
New	2 244	38	2 282
Fresh	17	1	18
Picked	5	0	5
Done	0	0	0
Total	2 266	39	2 305

Accuracy

94.2%

Counts

2 305 → 39

Alt Table

Click to see full alt table

Status	Accuracy	Program
	16.1%	(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 (.f64 d (/.f64 d h))) (.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 (.f64 (.f64 h #s(literal 1/8 binary64)) M) M) (.f64 D D)) (.f64 d (*.f64 d l)))))))
	49.9%	(/.f64 (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 (.f64 (.f64 h #s(literal 1/8 binary64)) M) M) (.f64 D D)) (.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
	55.8%	(/.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (/.f64 h l) (.f64 (.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (*.f64 d d)) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 h d)))
▶	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 (.f64 (.f64 h #s(literal 1/8 binary64)) M) M) (.f64 D D)) (.f64 d (*.f64 d l)))))) (sqrt.f64 (/.f64 h d)))
	36.2%	(/.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 h l) (.f64 (.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 d d)) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
	36.2%	(.f64 (fma.f64 (/.f64 h l) (.f64 (.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 d d)) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	34.8%	(.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 (.f64 (.f64 h #s(literal 1/8 binary64)) M) M) (.f64 D D)) (.f64 d (.f64 d l))))) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	27.5%	(.f64 (.f64 (fma.f64 (/.f64 h l) (.f64 (.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 d d)) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (/.f64 d h) l))) (sqrt.f64 d))
	55.5%	(.f64 (.f64 (fma.f64 (/.f64 h l) (.f64 (.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 d d)) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	64.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) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
	38.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) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) 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.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 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.2%	(.f64 (.f64 (pow.f64 (/.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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
▶	58.8%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.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 M (.f64 D (.f64 M D))) (.f64 h #s(literal 1/2 binary64))) (.f64 (*.f64 d d) #s(literal 4 binary64))) l)))
	66.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) (/.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (/.f64 d (.f64 #s(literal 1/2 binary64) (.f64 M D))) (/.f64 d (.f64 #s(literal 1/2 binary64) (.f64 M D)))))))
	57.4%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.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)) (/.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))))
	65.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 (.f64 M D) (.f64 (/.f64 #s(literal 1/2 binary64) d) (/.f64 (.f64 M D) (*.f64 d #s(literal 2 binary64)))))) (/.f64 h l))))
	32.2%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.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))))))
	57.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 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal 1/2 binary64))) (.f64 (*.f64 d d) #s(literal 4 binary64))) l)))
▶	71.2%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
▶	54.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	2.5%	(.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))))))
	32.2%	(.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 (.f64 D (.f64 M D))) (.f64 h #s(literal 1/2 binary64))) (.f64 (*.f64 d d) #s(literal 4 binary64))) l)))
	40.1%	(.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)))))
	30.7%	(.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))))))
	42.4%	(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	34.2%	(.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) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	66.8%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h 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))))
	49.5%	(.f64 (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 (.f64 (.f64 h #s(literal 1/8 binary64)) M) M) (.f64 D D)) (.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	34.2%	(.f64 (.f64 (.f64 (sqrt.f64 d) (pow.f64 (pow.f64 h #s(literal -1/4 binary64)) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	66.6%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.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))))
	19.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (.f64 (.f64 D (.f64 D (.f64 M M))) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))) d))
	30.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (/.f64 h l)) (.f64 (sqrt.f64 (/.f64 (.f64 h (.f64 h h)) (.f64 l (.f64 l l)))) (.f64 (.f64 D D) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d)))) h))
	22.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l)))
	15.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
	12.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M M) (/.f64 (.f64 (*.f64 D D) #s(literal 1/8 binary64)) d))))
	29.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
	28.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 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))))))
▶	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))

Compiler

Compiled 2 924 to 1 822 computations (37.7% saved)

simplify237.0ms (1.1%)

Memory

-16.5MiB live, 308.0MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

7 806×	`lower-*.f32`
7 746×	`lower-*.f64`
2 486×	`lower-/.f32`
2 456×	`lower-/.f64`
1 690×	`times-frac`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	84	841
0	140	828
1	291	788
2	1011	788
3	6067	788
0	8077	785

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

localize288.0ms (1.3%)

Memory

3.1MiB live, 431.1MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	5.727920047324465	(.f64 (.f64 M (.f64 D (.f64 M D))) (*.f64 h #s(literal 1/2 binary64)))
accuracy	12.00471887921461	(sqrt.f64 (/.f64 l d))
accuracy	14.23939331173011	(/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 h #s(literal 1/2 binary64))) (.f64 (*.f64 d d) #s(literal 4 binary64)))
accuracy	15.263331644422076	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	6.755745797381997	(.f64 h (.f64 M M))
accuracy	13.015318422645946	(sqrt.f64 (/.f64 d l))
accuracy	13.709794108832371	(/.f64 (.f64 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l)))
accuracy	15.263331644422076	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	12.844843857674793	(.f64 (.f64 (.f64 (.f64 h #s(literal 1/8 binary64)) M) M) (*.f64 D D))
accuracy	13.015318422645946	(sqrt.f64 (/.f64 d l))
accuracy	13.709794108832371	(/.f64 (.f64 (.f64 (.f64 (.f64 h #s(literal 1/8 binary64)) M) M) (.f64 D D)) (.f64 d (*.f64 d l)))
accuracy	15.309017982345768	(sqrt.f64 (/.f64 h d))
accuracy	0.2265625	(.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))
accuracy	0.6729910641148905	(/.f64 #s(literal 1 binary64) (*.f64 h l))
accuracy	12.651227928999045	(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 h l)))
accuracy	44.83422324366897	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))
accuracy	5.091690100213678	(/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))
accuracy	5.264722697456463	(/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
accuracy	13.015318422645946	(sqrt.f64 (/.f64 d l))
accuracy	15.263331644422076	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

178.0ms

256×

valid

Compiler

Compiled 752 to 76 computations (89.9% saved)

Precisions

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

ival-mult: 51.0ms (44.2% of total)

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

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

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

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

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

exact: 1.0ms (0.9% of total)

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

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

series81.0ms (0.4%)

Memory

42.1MiB live, 148.2MiB allocated

Counts

25 → 972

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

Calls

243 calls:

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

simplify297.0ms (1.3%)

Memory

-17.1MiB live, 416.7MiB allocated

Algorithm

1×	egg-herbie

Rules

7 588×	`lower-fma.f64`
7 588×	`lower-fma.f32`
5 984×	`lower-*.f64`
5 984×	`lower-*.f32`
3 312×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	219	13796
1	617	13439
2	2256	13372
3	4116	13325
4	7636	13325
0	8208	13166

Stop Event

1×	iter limit
1×	node limit

Counts

972 → 972

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

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

rewrite388.0ms (1.8%)

Memory

45.1MiB live, 506.4MiB allocated

Rules

5 716×	`lower-/.f32`
5 686×	`lower-/.f64`
3 648×	`lower-*.f32`
3 596×	`lower-*.f64`
1 638×	`frac-2neg`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	79	357
0	130	349
1	438	313
2	2748	309
0	8109	308

Stop Event

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

Counts

25 → 1 196

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

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

eval604.0ms (2.7%)

Memory: -154.4MiB live, 664.7MiB allocated
Compiler: Compiled 92 593 to 4 881 computations (94.7% saved)

prune479.0ms (2.2%)

Memory

-9.0MiB live, 847.8MiB allocated

Pruning

51 alts after pruning (50 fresh and 1 done)

	Pruned	Kept	Total
New	2 636	42	2 678
Fresh	26	8	34
Picked	4	1	5
Done	0	0	0
Total	2 666	51	2 717

Accuracy

95.0%

Counts

2 717 → 51

Alt Table

Click to see full alt table

Status	Accuracy	Program
	31.2%	(/.f64 (/.f64 (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 h #s(literal 1/8 binary64)) (.f64 M (.f64 M (.f64 D D)))) (.f64 d (*.f64 d l))))) (sqrt.f64 d)) (sqrt.f64 l)) (sqrt.f64 (/.f64 h d)))
	49.9%	(/.f64 (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 (.f64 (.f64 h #s(literal 1/8 binary64)) M) M) (.f64 D D)) (.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
	57.1%	(/.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 (.f64 M (.f64 h #s(literal 1/8 binary64))) (/.f64 (.f64 M (*.f64 D D)) d)) l) d)))) (sqrt.f64 (/.f64 h d)))
	29.2%	(/.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 (.f64 (.f64 h #s(literal 1/8 binary64)) M) M) (.f64 D D)) (.f64 d (*.f64 d l)))))) (/.f64 (sqrt.f64 (neg.f64 h)) (sqrt.f64 (neg.f64 d))))
▶	65.5%	(/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d)))
	61.4%	(/.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 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d (*.f64 d l))) D)))) (sqrt.f64 (/.f64 h d)))
	31.1%	(/.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 h #s(literal 1/8 binary64)) (.f64 M (.f64 M (.f64 D D)))) (.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 l))
	36.2%	(/.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 h l) (.f64 (.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 d d)) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
	42.7%	(/.f64 #s(approx (* (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
	8.8%	(/.f64 #s(approx (* (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 h d)))
	36.2%	(.f64 (fma.f64 (/.f64 h l) (.f64 (.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 d d)) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
▶	72.1%	(.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l 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)))))
	22.0%	(.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))))))
	21.4%	(.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))))))
	26.3%	(.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))))))
	57.1%	(.f64 (/.f64 (sqrt.f64 (.f64 d d)) (sqrt.f64 (.f64 h l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	47.7%	(.f64 (/.f64 (sqrt.f64 (.f64 d 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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	46.1%	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (/.f64 h d) (/.f64 l d)))) (-.f64 #s(literal 1 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))) l)))
	36.4%	(.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 h #s(literal 1/8 binary64)) (.f64 M (.f64 M (.f64 D D)))) (.f64 d (.f64 d l))))) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	55.5%	(.f64 (.f64 (fma.f64 (/.f64 h l) (.f64 (.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 d d)) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	64.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) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
	65.6%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d))))
	52.4%	(.f64 (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 h #s(literal 1/8 binary64)) (.f64 M (.f64 M (.f64 D D)))) (.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	34.2%	(.f64 (.f64 (.f64 (sqrt.f64 d) (pow.f64 (pow.f64 h #s(literal -1/4 binary64)) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 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.8%	(.f64 (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 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))) l)))
	71.2%	(.f64 (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	39.8%	(.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (-.f64 #s(literal 1 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))) l)))
	47.4%	(.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	32.6%	(.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) (/.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)))
	33.4%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (/ 1 (sqrt (/ l d)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))))) (-.f64 #s(literal 1 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))) l)))
	40.8%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (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)))))
	34.1%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.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))))))
	34.0%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h 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))))))
	20.2%	#s(approx (/ (* (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ h d))) (/.f64 (fma.f64 d (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 M (.f64 M (.f64 D D))) (sqrt.f64 (/.f64 h (.f64 l (*.f64 l l))))))) d))
	15.6%	#s(approx (/ (* (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ h d))) (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
	29.1%	#s(approx (/ (* (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ h d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
	29.4%	#s(approx (/ (* (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ h d))) (.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 (.f64 h h) l)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 #s(literal -1/8 binary64) (.f64 M (.f64 M (.f64 D D))))) d))))
▶	22.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l)))
▶	26.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l))))
	26.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) d)))
▶	15.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))))
	28.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 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))))))
	27.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 h))))
	27.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 h)) (sqrt.f64 l))))
	2.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (sqrt.f64 (neg.f64 l)))))
	25.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 h l)))))
	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))))
	26.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) h) l))))
✓	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))
	26.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) h)))))
	20.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)) (/.f64 #s(literal 1 binary64) (.f64 h l)))))))

Compiler

Compiled 3 134 to 1 972 computations (37.1% saved)

simplify167.0ms (0.8%)

Memory

-19.6MiB live, 259.3MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

9 024×	`lower-*.f32`
8 972×	`lower-*.f64`
2 262×	`lower-/.f32`
2 224×	`lower-/.f64`
1 716×	`distribute-rgt-neg-in`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	84	790
0	140	764
1	270	734
2	795	734
3	4781	734
0	8089	729

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

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

localize315.0ms (1.4%)

Memory

38.2MiB live, 435.6MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	4.609332803417239	(.f64 (.f64 M (*.f64 h #s(literal 1/8 binary64))) D)
accuracy	8.741518904921717	(/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (*.f64 d l))
accuracy	13.015318422645947	(sqrt.f64 (/.f64 d l))
accuracy	15.309017982345768	(sqrt.f64 (/.f64 h d))
accuracy	12.51957386323321	(sqrt.f64 (*.f64 h l))
accuracy	17.822565328068546	(sqrt.f64 (.f64 l (/.f64 (.f64 l l) h)))
accuracy	20.801821858255778	(/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))
accuracy	31.209020478987423	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l)))
accuracy	8.744825777276603	(.f64 M (.f64 D D))
accuracy	10.80777166127319	(.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))
accuracy	17.44698599283952	(sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))
accuracy	48.00130274226123	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))))
accuracy	0	(*.f64 h l)
accuracy	0.19140625	(/.f64 d (sqrt.f64 (*.f64 h l)))
accuracy	12.51957386323321	(sqrt.f64 (*.f64 h l))
accuracy	44.83422324366897	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l))))
accuracy	5.091690100213678	(/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64)))
accuracy	5.264722697456463	(/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h))
accuracy	12.00471887921461	(sqrt.f64 (/.f64 l d))
accuracy	15.263331644422065	(sqrt.f64 (/.f64 d h))

Samples

219.0ms

256×

valid

Compiler

Compiled 689 to 79 computations (88.5% saved)

Precisions

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

ival-div: 107.0ms (57.9% of total)

ival-mult: 49.0ms (26.5% of total)

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

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

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

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

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

exact: 1.0ms (0.5% of total)

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

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

series251.0ms (1.1%)

Memory

-46.2MiB live, 209.9MiB allocated

Counts

27 → 1 140

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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())
#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())
#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())
#s(alt (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) #<representation binary64>) () ())
#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())
#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())
#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())
#s(alt (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d l)) (patch (sqrt.f64 (/.f64 d l)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())
#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())
#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 h l)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 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 (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) (patch (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h (pow l 3))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h (pow l 3))) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (patch (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor 0 h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor 0 h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor 0 h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor 0 h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor inf h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor inf h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor inf h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor inf h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor -inf h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor -inf h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor -inf h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor -inf h) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor 0 l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor 0 l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor 0 l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor 0 l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor inf l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor inf l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor inf l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor inf l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor -inf l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor -inf l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor -inf l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ h (pow l 3)) (taylor -inf l) (#s(alt (/.f64 h (.f64 l (.f64 l l))) (patch (/.f64 h (.f64 l (.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 #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.f64 l l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (*.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.f64 l l)) (patch (/.f64 (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (.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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf d) (#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor -inf d) (#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (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)))) (taylor 0 l) (#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (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)))) (taylor 0 l) (#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (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)))) (taylor 0 l) (#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor inf l) (#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 h) (#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (* h l)))) (taylor -inf h) (#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 D) (#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (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)))) (taylor 0 D) (#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (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)))) (taylor 0 D) (#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (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)))) (taylor 0 D) (#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ (pow l 3) h))) (taylor 0 M) (#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (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)))) (taylor 0 M) (#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (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)))) (taylor 0 M) (#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (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)))) (taylor 0 M) (#s(alt (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<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 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) (patch (fma.f64 d (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (.f64 (.f64 D (/.f64 (.f64 D (.f64 M M)) d)) (.f64 #s(literal -1/8 binary64) (sqrt.f64 (.f64 h l))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.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 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.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 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.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 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.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 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ (pow l 3) h)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.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 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.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 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.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 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.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 l (/.f64 (.f64 l l) h))) (patch (sqrt.f64 (.f64 l (/.f64 (.f64 l l) h))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d) (patch (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) 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 d) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (/.f64 (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<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 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<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 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<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 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (patch (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 d) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))) (taylor inf d) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))) (* (sqrt (/ 1 (* d l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 l) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor inf l) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (* (pow D 2) (* (pow M 2) (* h (pow (sqrt -1) 2)))) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 M) (#s(alt (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 M) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf M) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor inf M) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf M) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l))))) (taylor -inf M) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 D) (#s(alt (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 D) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf D) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor inf D) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf D) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l))))) (taylor -inf D) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 h) (#s(alt (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))) (taylor 0 h) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf h) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h)))) (taylor inf h) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf h) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (patch (.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) 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 (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 (/ 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/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) (patch (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor 0 M) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor 0 M) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor 0 M) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor 0 M) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor inf M) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor inf M) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor inf M) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor inf M) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor -inf M) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor -inf M) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor -inf M) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor -inf M) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor 0 D) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor 0 D) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor 0 D) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor 0 D) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor inf D) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor inf D) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor inf D) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor inf D) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor -inf D) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor -inf D) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor -inf D) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) M) (taylor -inf D) (#s(alt (.f64 M (.f64 D D)) (patch (.f64 M (.f64 D D)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h d)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h d)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h d)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h d)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h d)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h d)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h d)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h d)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h d)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h d)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h d)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ h d)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h d)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h d)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h d)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h d)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h d)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h d)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h d)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ h d)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ h d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ h d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ h d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ h d)) (pow (sqrt -1) 2)) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 h d)) (patch (sqrt.f64 (/.f64 h d)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 M) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 M) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 M) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 M) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf M) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf M) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf M) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf M) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf M) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf M) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf M) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf M) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 h) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 h) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 h) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 h) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf h) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf h) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf h) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf h) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf h) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf h) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf h) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf h) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 D) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 D) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 D) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 D) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf D) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf D) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf D) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf D) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf D) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf D) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf D) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf D) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 d) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 d) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 d) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 d) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf d) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf d) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf d) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf d) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf d) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf d) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf d) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf d) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 l) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 l) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 l) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor 0 l) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf l) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf l) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf l) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor inf l) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf l) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf l) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf l) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* D (* (pow M 2) h)) (* d l))) (taylor -inf l) (#s(alt (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) (patch (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor 0 M) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor 0 M) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor 0 M) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor 0 M) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor inf M) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor inf M) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor inf M) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor inf M) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor -inf M) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor -inf M) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor -inf M) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor -inf M) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor 0 h) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor 0 h) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor 0 h) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor 0 h) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor inf h) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor inf h) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor inf h) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor inf h) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor -inf h) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor -inf h) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor -inf h) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor -inf h) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor 0 D) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor 0 D) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor 0 D) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor 0 D) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor inf D) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor inf D) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor inf D) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor inf D) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor -inf D) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor -inf D) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor -inf D) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (* D (* M h))) (taylor -inf D) (#s(alt (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) (patch (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D) #<representation binary64>) () ())) ())

Calls

285 calls:

Time	Variable		Point	Expression
25.0ms	D	@	inf	(* (sqrt (/ h (* l (* l l)))) (* (* M (* M (* D D))) (/ 1/8 d)))
23.0ms	h	@	0	(/ (* M (* (* M (* h 1/8)) D)) (* d l))
19.0ms	M	@	0	(/ (* 1/2 (* M D)) (* d 2))
16.0ms	M	@	0	(* (sqrt (/ h (* l (* l l)))) (* (* M (* M (* D D))) (/ 1/8 d)))
9.0ms	h	@	inf	(/ (* M (* (* M (* h 1/8)) D)) (* d l))

simplify460.0ms (2.1%)

Memory

26.9MiB live, 379.5MiB allocated

Algorithm

1×	egg-herbie

Rules

7 796×	`lower-*.f64`
7 796×	`lower-*.f32`
4 828×	`lower-fma.f64`
4 828×	`lower-fma.f32`
3 098×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	315	18213
1	957	17648
2	3519	17519
3	7430	17465
0	8023	17141

Stop Event

1×	iter limit
1×	node limit

Counts

1 140 → 1 140

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

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

rewrite508.0ms (2.3%)

Memory

-3.9MiB live, 456.5MiB allocated

Rules

7 330×	`lower-*.f32`
7 280×	`lower-*.f64`
4 580×	`lower-/.f32`
4 544×	`lower-/.f64`
2 418×	`lower--.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	82	464
0	136	442
1	461	414
2	3461	406
0	10299	402

Stop Event

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

Counts

27 → 738

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

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

eval415.0ms (1.9%)

Memory: 28.8MiB live, 535.7MiB allocated
Compiler: Compiled 60 093 to 3 313 computations (94.5% saved)

prune444.0ms (2%)

Memory

-3.9MiB live, 883.4MiB allocated

Pruning

59 alts after pruning (56 fresh and 3 done)

	Pruned	Kept	Total
New	1 908	35	1 943
Fresh	24	21	45
Picked	3	2	5
Done	0	1	1
Total	1 935	59	1 994

Accuracy

95.9%

Counts

1 994 → 59

Alt Table

Click to see full alt table

Status	Accuracy	Program
	35.6%	(/.f64 (.f64 (/.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 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d)))
	35.6%	(/.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 l))) (sqrt.f64 (neg.f64 d))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d)))
	29.2%	(/.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 (.f64 (.f64 h #s(literal 1/8 binary64)) M) M) (.f64 D D)) (.f64 d (*.f64 d l)))))) (/.f64 (sqrt.f64 (neg.f64 h)) (sqrt.f64 (neg.f64 d))))
	65.9%	(/.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 D (/.f64 (.f64 (.f64 M D) (.f64 M (.f64 h #s(literal 1/8 binary64)))) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d)))
	65.1%	(/.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 D (/.f64 (.f64 M (.f64 (.f64 M (*.f64 h #s(literal 1/8 binary64))) (/.f64 D l))) d)) d)))) (sqrt.f64 (/.f64 h d)))
	68.1%	(/.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 D (.f64 (/.f64 (.f64 (.f64 M D) (*.f64 h #s(literal 1/8 binary64))) d) (/.f64 M l))) d)))) (sqrt.f64 (/.f64 h d)))
	61.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 (.f64 M D) (.f64 M (.f64 h #s(literal 1/8 binary64)))) (.f64 d (*.f64 d l))) D)))) (sqrt.f64 (/.f64 h d)))
	31.1%	(/.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 h #s(literal 1/8 binary64)) (.f64 M (.f64 M (.f64 D D)))) (.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h)))) (sqrt.f64 l))
	42.7%	(/.f64 #s(approx (* (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 h d)))
	8.8%	(/.f64 #s(approx (* (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (neg.f64 (sqrt.f64 (/.f64 d l)))) (sqrt.f64 (/.f64 h d)))
	36.2%	(.f64 (fma.f64 (/.f64 h l) (.f64 (.f64 (/.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 d d)) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	70.2%	(.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (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)))
	69.4%	(.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (.f64 (/.f64 #s(literal 1/2 binary64) d) h)))))
	72.1%	(.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (-.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))))
	22.0%	(.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))))))
	26.3%	(.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))))))
	57.1%	(.f64 (/.f64 (sqrt.f64 (.f64 d d)) (sqrt.f64 (.f64 h l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	47.7%	(.f64 (/.f64 (sqrt.f64 (.f64 d 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 D (.f64 D (.f64 #s(literal 1/8 binary64) (.f64 h (.f64 M M))))) (.f64 d (*.f64 d l))))))
	36.4%	(.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 h #s(literal 1/8 binary64)) (.f64 M (.f64 M (.f64 D D)))) (.f64 d (.f64 d l))))) (sqrt.f64 (/.f64 (.f64 d d) (*.f64 h l))))
	36.8%	(.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l))))
	60.5%	(.f64 (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (*.f64 d l))))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	39.8%	(.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (-.f64 #s(literal 1 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))) l)))
	47.4%	(.f64 (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) l) (/.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 M D)) (*.f64 d #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) h)))))
	40.8%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (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)))))
	34.1%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.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))))))
	34.0%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h 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))))))
	15.6%	#s(approx (/ (* (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ h d))) (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 M M)) d))))
	15.8%	#s(approx (/ (* (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ h d))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 D (.f64 D (*.f64 M M))) (/.f64 #s(literal -1/8 binary64) d))))
	29.1%	#s(approx (/ (* (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ h d))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d)))
	39.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (/.f64 (.f64 (.f64 M (.f64 D (.f64 M D))) #s(literal -1/8 binary64)) d) (sqrt.f64 (.f64 h l)) (.f64 d (.f64 l (sqrt.f64 (/.f64 l h))))) (.f64 l l)))
	39.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 (fma.f64 (.f64 (.f64 D D) (/.f64 (.f64 M M) d)) (.f64 (sqrt.f64 (.f64 h l)) #s(literal -1/8 binary64)) (.f64 d (*.f64 l (sqrt.f64 (/.f64 l h))))) l) l))
	26.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l)))
	43.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))))
	17.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) (neg.f64 d))) (sqrt.f64 (neg.f64 l))))
	17.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d h) d)) (sqrt.f64 l)))
	16.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))))
	14.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* d (sqrt (* l (/ (* l l) h)))) (* (* D (/ (* D (* M M)) d)) (* -1/8 (sqrt (* h l))))) (.f64 (.f64 M M) (.f64 (sqrt.f64 (.f64 h l)) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) d)))) (*.f64 l l)))
	10.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* d (sqrt (* l (/ (* l l) h)))) (* (* D (/ (* D (* M M)) d)) (* -1/8 (sqrt (* h l))))) (.f64 (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)) (neg.f64 d))) (.f64 l l)))
	15.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* d (sqrt (* l (/ (* l l) h)))) (* (* D (/ (* D (* M M)) d)) (* -1/8 (sqrt (* h l))))) (.f64 d (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 D (.f64 D (.f64 M M))) (/.f64 (sqrt.f64 (.f64 h l)) (.f64 d d))) (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h))))) (.f64 l l)))
	10.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(approx (+ (* d (sqrt (* l (/ (* l l) h)))) (* (* D (/ (* D (* M M)) d)) (* -1/8 (sqrt (* h l))))) (.f64 d (sqrt.f64 (/.f64 (.f64 l (.f64 l l)) h)))) (.f64 l l)))
	27.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
✓	26.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l))))
	20.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (sqrt.f64 (.f64 (.f64 h l) (*.f64 h l))))))
	26.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 h l)) d)))
	33.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 h d) (/.f64 l d)))))
	16.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (.f64 l l) (/.f64 h l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))))
	25.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 h l))) d))
	16.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1/8 binary64) d) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M (.f64 D (*.f64 M D))))))
	15.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 M (.f64 D (*.f64 M D)))))
	12.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (sqrt.f64 (neg.f64 h)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l (.f64 l (neg.f64 l)))))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))))
	16.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))))
✓	15.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (*.f64 D D))) (/.f64 #s(literal 1/8 binary64) d))))
	42.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))))
	27.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 l)) (sqrt.f64 h))))
	2.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 d (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (sqrt.f64 (neg.f64 l)))))
✓	25.7%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l)))))
	26.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 d (sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) l) (/.f64 #s(literal 1 binary64) h)))))
	14.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (neg.f64 (.f64 D (.f64 D (*.f64 M M)))) d))))
	24.9%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l))))

Compiler

Compiled 5 482 to 1 542 computations (71.9% saved)

regimes327.0ms (1.5%)

Memory

-40.7MiB live, 500.7MiB allocated

Counts

139 → 2

Calls

Call 1

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

Outputs

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

Calls

7 calls:

81.0ms	D
42.0ms	d
40.0ms	l
40.0ms	(*.f64 M D)
39.0ms	h

Results

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

Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes138.0ms (0.6%)

Memory

41.6MiB live, 155.8MiB allocated

Counts

112 → 2

Calls

Call 1

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

Calls

3 calls:

57.0ms	h
42.0ms	d
31.0ms	l

Results

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

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes205.0ms (0.9%)

Memory

-9.6MiB live, 108.2MiB allocated

Counts

111 → 4

Calls

Call 1

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

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

Calls

3 calls:

72.0ms	h
64.0ms	d
30.0ms	l

Results

Accuracy	Segments	Branch
81.6%	4	`d`
77.1%	2	`h`
78.9%	3	`l`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes67.0ms (0.3%)

Memory

12.9MiB live, 49.6MiB allocated

Counts

93 → 4

Calls

Call 1

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

Calls

1 calls:

61.0ms

Results

Accuracy	Segments	Branch
81.6%	4	`d`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes260.0ms (1.2%)

Memory

-20.7MiB live, 136.4MiB allocated

Counts

86 → 5

Calls

Call 1

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

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

Calls

4 calls:

72.0ms	l
66.0ms	d
60.0ms	h
56.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
74.7%	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))))`
72.1%	1	`h`
74.6%	2	`l`
79.9%	5	`d`

Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes112.0ms (0.5%)

Memory

2.8MiB live, 86.4MiB allocated

Counts

85 → 5

Calls

Call 1

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

Calls

3 calls:

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

31.0ms

23.0ms

Results

Accuracy	Segments	Branch
72.7%	2	`l`
72.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))))`
78.9%	5	`d`

Compiler

Compiled 52 to 32 computations (38.5% saved)

regimes35.0ms (0.2%)

Memory

5.8MiB live, 43.3MiB allocated

Counts

79 → 5

Calls

Call 1

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

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

Calls

1 calls:

30.0ms

Results

Accuracy	Segments	Branch
78.9%	5	`d`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes224.0ms (1%)

Memory

-6.0MiB live, 184.7MiB allocated

Counts

78 → 5

Calls

Call 1

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

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

Calls

5 calls:

63.0ms	h
54.0ms	D
46.0ms	(*.f64 M D)
32.0ms	d
22.0ms	M

Results

Accuracy	Segments	Branch
70.2%	1	`h`
70.2%	1	`(*.f64 M D)`
70.2%	1	`M`
70.2%	1	`D`
78.0%	5	`d`

Compiler

Compiled 32 to 26 computations (18.8% saved)

regimes77.0ms (0.3%)

Memory

1.7MiB live, 157.5MiB allocated

Counts

77 → 5

Calls

Call 1

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

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

Calls

3 calls:

25.0ms

23.0ms

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

Compiler

Compiled 52 to 32 computations (38.5% saved)

regimes121.0ms (0.5%)

Memory

3.8MiB live, 245.9MiB allocated

Counts

73 → 5

Calls

Call 1

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

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

Calls

5 calls:

29.0ms	d
23.0ms	D
22.0ms	h
21.0ms	M
20.0ms	(*.f64 M D)

Results

Accuracy	Segments	Branch
68.9%	2	`h`
65.5%	1	`M`
65.5%	1	`(*.f64 M D)`
65.5%	1	`D`
76.1%	5	`d`

Compiler

Compiled 32 to 26 computations (18.8% saved)

regimes177.0ms (0.8%)

Memory

2.5MiB live, 79.4MiB allocated

Counts

72 → 3

Calls

Call 1

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

Outputs

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

Calls

2 calls:

151.0ms	l
21.0ms	d

Results

Accuracy	Segments	Branch
72.0%	3	`l`
76.5%	6	`d`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes102.0ms (0.5%)

Memory

32.1MiB live, 183.6MiB allocated

Counts

44 → 5

Calls

Call 1

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

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

Calls

7 calls:

16.0ms	D
15.0ms	(*.f64 M D)
15.0ms	h
15.0ms	d
13.0ms	M

Results

Accuracy	Segments	Branch
52.9%	2	`(*.f64 M D)`
53.0%	2	`M`
50.0%	2	`D`
63.2%	3	`h`
59.9%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
70.1%	5	`d`
63.9%	3	`l`

Compiler

Compiled 78 to 53 computations (32.1% saved)

regimes19.0ms (0.1%)

Memory

-20.2MiB live, 26.5MiB allocated

Counts

41 → 4

Calls

Call 1

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

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

Calls

1 calls:

16.0ms

Results

Accuracy	Segments	Branch
67.9%	4	`d`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes51.0ms (0.2%)

Memory

7.9MiB live, 84.5MiB allocated

Counts

37 → 4

Calls

Call 1

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

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

Calls

4 calls:

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

Results

Accuracy	Segments	Branch
55.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))))`
54.6%	3	`h`
55.4%	3	`l`
59.8%	4	`d`

Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes16.0ms (0.1%)

Memory

-11.6MiB live, 26.4MiB allocated

Counts

36 → 4

Calls

Call 1

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

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

Calls

1 calls:

14.0ms

Results

Accuracy	Segments	Branch
59.4%	4	`d`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes11.0ms (0.1%)

Memory

24.0MiB live, 24.0MiB allocated

Counts

31 → 4

Calls

Call 1

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

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

Calls

1 calls:

9.0ms

Results

Accuracy	Segments	Branch
59.4%	4	`d`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes15.0ms (0.1%)

Memory

-34.3MiB live, 23.2MiB allocated

Counts

30 → 4

Calls

Call 1

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

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

Calls

1 calls:

13.0ms

Results

Accuracy	Segments	Branch
58.7%	4	`d`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes10.0ms (0%)

Memory

22.4MiB live, 22.4MiB allocated

Counts

29 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

9.0ms

Results

Accuracy	Segments	Branch
55.5%	3	`d`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes38.0ms (0.2%)

Memory

-1.3MiB live, 76.4MiB allocated

Counts

28 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

4 calls:

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

Results

Accuracy	Segments	Branch
54.1%	3	`h`
52.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))))`
52.3%	2	`l`
54.6%	3	`d`

Compiler

Compiled 58 to 37 computations (36.2% saved)

regimes50.0ms (0.2%)

Memory

-25.0MiB live, 94.1MiB allocated

Counts

27 → 2

Calls

Call 1

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

Outputs

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

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

Calls

5 calls:

11.0ms	(*.f64 M D)
10.0ms	d
10.0ms	l
8.0ms	M
8.0ms	h

Results

Accuracy	Segments	Branch
52.3%	2	`l`
52.3%	2	`h`
45.6%	2	`(*.f64 M D)`
45.2%	2	`M`
52.3%	2	`d`

Compiler

Compiled 32 to 26 computations (18.8% saved)

regimes16.0ms (0.1%)

Memory

-5.0MiB live, 33.8MiB allocated

Counts

7 → 2

Calls

Call 1

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 64 to 42 computations (34.4% saved)

regimes12.0ms (0.1%)

Memory

23.2MiB live, 23.2MiB allocated

Counts

5 → 2

Calls

Call 1

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

Outputs

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

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

Calls

5 calls:

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

Results

Accuracy	Segments	Branch
28.5%	2	`M`
28.6%	2	`(*.f64 M D)`
35.3%	2	`h`
35.3%	2	`l`
35.8%	2	`d`

Compiler

Compiled 32 to 26 computations (18.8% saved)

regimes22.0ms (0.1%)

Memory

-18.4MiB live, 21.0MiB allocated

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

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

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 78 to 53 computations (32.1% saved)

bsearch125.0ms (0.6%)

Memory

25.6MiB live, 104.3MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
117.0ms	-2.9827284744267607e-271	4.917945046781511e-307

Samples

55.0ms	200×	0	invalid
48.0ms	192×	0	valid

Compiler

Compiled 1 147 to 702 computations (38.8% saved)

Precisions

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

ival-mult: 39.0ms (43.7% of total)

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

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

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

ival-sub: 2.0ms (2.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

4.6MiB live, 4.6MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
2.0ms	-2.9827284744267607e-271	4.917945046781511e-307

Compiler

Compiled 1 087 to 654 computations (39.8% saved)

bsearch221.0ms (1%)

Memory

-28.2MiB live, 267.2MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
51.0ms	1.1199568046244134e+176	7.77142299661521e+177
83.0ms	1.2898010515892475e-112	3.472810536677739e-110
70.0ms	-2.3524789122346477e-296	-6.265790363406256e-307

Samples

96.0ms	390×	0	invalid
82.0ms	400×	0	valid

Compiler

Compiled 1 770 to 1 085 computations (38.7% saved)

Precisions

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

ival-div: 43.0ms (40.3% of total)

ival-mult: 33.0ms (31% of total)

ival-pow: 17.0ms (15.9% of total)

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

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

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

exact: 1.0ms (0.9% of total)

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

bsearch4.0ms (0%)

Memory

7.1MiB live, 7.1MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	1.1199568046244134e+176	7.77142299661521e+177
1.0ms	1.2898010515892475e-112	3.472810536677739e-110
1.0ms	-2.3524789122346477e-296	-6.265790363406256e-307

Compiler

Compiled 1 710 to 1 070 computations (37.4% saved)

bsearch151.0ms (0.7%)

Memory

-14.1MiB live, 179.8MiB allocated

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	1.1199568046244134e+176	7.77142299661521e+177
1.0ms	1.2898010515892475e-112	3.472810536677739e-110
54.0ms	4.872329439988951e-267	2.909921888681034e-261
58.0ms	-1.1672823309830517e-156	-4.852771936373014e-158

Samples

65.0ms	256×	0	valid
30.0ms	219×	0	invalid

Compiler

Compiled 2 204 to 1 384 computations (37.2% saved)

Precisions

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

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

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

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

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

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

exact: 1.0ms (1.3% of total)

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

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

bsearch104.0ms (0.5%)

Memory

1.3MiB live, 120.6MiB allocated

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
5.0ms	1.1199568046244134e+176	7.77142299661521e+177
1.0ms	1.2898010515892475e-112	3.472810536677739e-110
1.0ms	4.872329439988951e-267	2.909921888681034e-261
86.0ms	-8.109220900697732e-141	-1.5185597891384259e-149

Samples

54.0ms	153×	0	invalid
26.0ms	160×	0	valid

Compiler

Compiled 2 364 to 1 484 computations (37.2% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch47.0ms (0.2%)

Memory

20.5MiB live, 96.1MiB allocated

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	1.1199568046244134e+176	7.77142299661521e+177
1.0ms	1.2898010515892475e-112	3.472810536677739e-110
39.0ms	4.872329439988951e-267	2.909921888681034e-261
1.0ms	-8.109220900697732e-141	-1.5185597891384259e-149

Samples

20.0ms	112×	0	valid
11.0ms	85×	0	invalid

Compiler

Compiled 2 364 to 1 484 computations (37.2% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch66.0ms (0.3%)

Memory

17.8MiB live, 130.6MiB allocated

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	1.1199568046244134e+176	7.77142299661521e+177
1.0ms	1.2898010515892475e-112	3.472810536677739e-110
1.0ms	-2.3524789122346477e-296	-6.265790363406256e-307
57.0ms	-8.109220900697732e-141	-1.5185597891384259e-149

Samples

28.0ms	128×	0	valid
20.0ms	136×	0	invalid

Compiler

Compiled 2 136 to 1 359 computations (36.4% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch129.0ms (0.6%)

Memory

-40.7MiB live, 175.3MiB allocated

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
45.0ms	2.735680862486354e+182	1.1040219652073195e+185
1.0ms	1.2898010515892475e-112	3.472810536677739e-110
1.0ms	-2.3524789122346477e-296	-6.265790363406256e-307
46.0ms	-3.2514974591656224e-104	-1.497853293764623e-105

Samples

44.0ms	240×	0	valid
31.0ms	223×	0	invalid

Compiler

Compiled 2 036 to 1 288 computations (36.7% saved)

Precisions

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

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

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

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

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

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

exact: 1.0ms (1.9% of total)

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

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

bsearch5.0ms (0%)

Memory

7.2MiB live, 7.2MiB allocated

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	2.735680862486354e+182	1.1040219652073195e+185
1.0ms	1.2898010515892475e-112	3.472810536677739e-110
1.0ms	-2.3524789122346477e-296	-6.265790363406256e-307
1.0ms	-3.2514974591656224e-104	-1.497853293764623e-105

Compiler

Compiled 2 036 to 1 288 computations (36.7% saved)

bsearch58.0ms (0.3%)

Memory

4.8MiB live, 84.5MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
51.0ms	1.0128878341971992e+132	1.0556658427814364e+134
1.0ms	-2.9827284744267607e-271	4.917945046781511e-307

Samples

25.0ms	117×	0	invalid
19.0ms	112×	0	valid

Compiler

Compiled 1 212 to 756 computations (37.6% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch196.0ms (0.9%)

Memory

16.2MiB live, 289.3MiB allocated

Algorithm

4×	binary-search

Stop Event

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

Steps

Time	Left	Right
55.0ms	3.0927257120936223e+151	1.9977662010215972e+153
1.0ms	-2.3524789122346477e-296	-6.265790363406256e-307
67.0ms	-3.9447853957748875e-76	-1.8112303427472197e-85
52.0ms	-3.1632733599215007e+94	-7.792992347983597e+90

Samples

71.0ms	402×	0	invalid
63.0ms	384×	0	valid

Compiler

Compiled 1 938 to 1 233 computations (36.4% saved)

Precisions

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

ival-mult: 46.0ms (43.1% of total)

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

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

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

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

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

exact: 1.0ms (0.9% of total)

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

bsearch90.0ms (0.4%)

Memory

-11.6MiB live, 109.5MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	3.0927257120936223e+151	1.9977662010215972e+153
1.0ms	-2.3524789122346477e-296	-6.265790363406256e-307
84.0ms	-2.611633668342707e-95	-3.768391732749302e-97

Samples

39.0ms	112×	0	valid
14.0ms	115×	0	invalid

Compiler

Compiled 1 273 to 813 computations (36.1% saved)

Precisions

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

ival-div: 20.0ms (44.4% of total)

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch139.0ms (0.6%)

Memory

-21.5MiB live, 105.3MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
106.0ms	6.576742358485754e-119	1.2898010515892475e-112
1.0ms	-2.3524789122346477e-296	-6.265790363406256e-307
1.0ms	-2.611633668342707e-95	-3.768391732749302e-97

Samples

39.0ms	144×	0	valid
18.0ms	148×	0	invalid

Compiler

Compiled 1 253 to 816 computations (34.9% saved)

Precisions

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

ival-pow2: 19.0ms (40.6% of total)

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch3.0ms (0%)

Memory

6.8MiB live, 6.8MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	6.576742358485754e-119	1.2898010515892475e-112
1.0ms	-2.3524789122346477e-296	-6.265790363406256e-307
1.0ms	-2.611633668342707e-95	-3.768391732749302e-97

Compiler

Compiled 1 253 to 816 computations (34.9% saved)

bsearch3.0ms (0%)

Memory

7.7MiB live, 7.7MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	6.576742358485754e-119	1.2898010515892475e-112
1.0ms	-2.3524789122346477e-296	-6.265790363406256e-307
1.0ms	-2.611633668342707e-95	-3.768391732749302e-97

Compiler

Compiled 1 253 to 816 computations (34.9% saved)

bsearch3.0ms (0%)

Memory

7.7MiB live, 7.7MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
1.0ms	6.576742358485754e-119	1.2898010515892475e-112
1.0ms	-2.3524789122346477e-296	-6.265790363406256e-307
1.0ms	-2.611633668342707e-95	-3.768391732749302e-97

Compiler

Compiled 1 253 to 816 computations (34.9% saved)

bsearch2.0ms (0%)

Memory

5.2MiB live, 5.2MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	-2.3524789122346477e-296	-6.265790363406256e-307
1.0ms	-2.611633668342707e-95	-3.768391732749302e-97

Compiler

Compiled 754 to 503 computations (33.3% saved)

bsearch112.0ms (0.5%)

Memory

3.1MiB live, 123.0MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	-2.3524789122346477e-296	-6.265790363406256e-307
105.0ms	-3.768391732749302e-97	-1.7098533384852029e-102

Samples

80.0ms	144×	0	valid
16.0ms	129×	0	invalid

Compiler

Compiled 840 to 561 computations (33.2% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch40.0ms (0.2%)

Memory

-22.2MiB live, 93.3MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
35.0ms	4.917945046781511e-307	2.782988072800883e-306

Samples

15.0ms	96×	0	valid
13.0ms	79×	0	invalid

Compiler

Compiled 223 to 162 computations (27.4% saved)

Precisions

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

ival-div: 6.0ms (29% of total)

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch53.0ms (0.2%)

Memory

29.3MiB live, 107.8MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
48.0ms	-1.055073791362615e-265	-2.3076830154680545e-268

Samples

22.0ms	128×	0	valid
18.0ms	121×	0	invalid

Compiler

Compiled 275 to 198 computations (28% saved)

Precisions

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

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

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

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

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

ival-sub: 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
1.0ms	-3.2514974591656224e-104	-1.497853293764623e-105

Compiler

Compiled 239 to 163 computations (31.8% saved)

simplify56.0ms (0.3%)

Memory

1.5MiB live, 79.6MiB allocated

Algorithm

1×	egg-herbie

Rules

202×	`*-commutative_binary64`
170×	`neg-mul-1_binary64`
140×	`unsub-neg_binary64`
86×	`distribute-rgt-neg-in_binary64`
84×	`distribute-lft-neg-in_binary64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	288	3699
1	391	3699
2	450	3699
3	496	3699
4	543	3699
5	572	3699
6	590	3699
7	709	3699
8	893	3699
9	894	3699

Stop Event

1×

saturated

Calls

Call 1

Inputs
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) 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)) (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))))))
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (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 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) 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 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (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))))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (if (<=.f64 d #s(literal 6799999999999999600761687959785736980751714813767260445075857450734287686705592628609537092193780965273497487309849879737241886711016945324189265290160455191404946415534601142272 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l 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))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (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))))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (if (<=.f64 d #s(literal 6799999999999999600761687959785736980751714813767260445075857450734287686705592628609537092193780965273497487309849879737241886711016945324189265290160455191404946415534601142272 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (-.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -6059594836091061/123665200736552267030251260509823595017565674550605919957031528046448612553265933585158200530621522494798835713008069669675682517153375604983773077550946583958303386074349568 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (-.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 d #s(literal 4084213920990005/4538015467766671944574165338592225830478699345884382504442663144885072806275648112625635725391102144133907238129251016389326737199538896813326509341743147661691195191795226666084858428449394948944821764472508048114220424520501343042471615418544488778723282182172070046459244838912 binary64)) #s(approx (/ ( (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ h d))) (.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 (.f64 h h) l)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 #s(literal -1/8 binary64) (.f64 M (.f64 M (.f64 D D))))) d)))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (if (<=.f64 d #s(literal 6799999999999999600761687959785736980751714813767260445075857450734287686705592628609537092193780965273497487309849879737241886711016945324189265290160455191404946415534601142272 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (-.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -3339993601068869/115172193140305827399949785796761135587064246228529065807379342658863042065190089480167441564259605943037975312218134915154131611020654072038617988630148194691448832 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (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))) (if (<=.f64 d #s(literal 4084213920990005/4538015467766671944574165338592225830478699345884382504442663144885072806275648112625635725391102144133907238129251016389326737199538896813326509341743147661691195191795226666084858428449394948944821764472508048114220424520501343042471615418544488778723282182172070046459244838912 binary64)) #s(approx (/ ( (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ h d))) (.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 (.f64 h h) l)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 #s(literal -1/8 binary64) (.f64 M (.f64 M (.f64 D D))))) d)))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (if (<=.f64 d #s(literal 6500000000000000160891218127062988864636429792940046642080104476080074868559694357010118713217592637631043569515371629592238085751285903770295351454613044666340382354471951269888 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (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))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -3339993601068869/115172193140305827399949785796761135587064246228529065807379342658863042065190089480167441564259605943037975312218134915154131611020654072038617988630148194691448832 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (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))) (if (<=.f64 d #s(literal 1452164949685335/290432989937067004452746581669902453150636758136600480284330441272644659601641479208040686425030537224570063240272065048916911180770489396052896597871561450348236492274894506629430939420761276732468592926240515079310107169312085954718183386786847281838290059659012482973391669690368 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 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)))))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (if (<=.f64 d #s(literal 6500000000000000160891218127062988864636429792940046642080104476080074868559694357010118713217592637631043569515371629592238085751285903770295351454613044666340382354471951269888 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (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))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -5623642243178995/14059105607947488696282932836518693308967803494693489478439861164411992439598399594747002144074658928593502845729752797260025831423419686528151609940203637047296 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (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))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1/8 binary64) d) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M (.f64 D (.f64 M D)))))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (if (<=.f64 d #s(literal 6500000000000000160891218127062988864636429792940046642080104476080074868559694357010118713217592637631043569515371629592238085751285903770295351454613044666340382354471951269888 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (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))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -3873374817130363/2582249878086908589655919172003011874329705792829223512830659356540647622016841194629645353280137831435903171972747493376 binary64)) (/.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 D (/.f64 (.f64 (.f64 M D) (.f64 M (.f64 h #s(literal 1/8 binary64)))) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (if (<=.f64 d #s(literal 1250000000000000021695835521211410866903344077186913201546055403902315923184530140615516337539855632424837203960271559416959075082968536574030926348960006730273314211586172078014857216 binary64)) (/.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 D (/.f64 (.f64 (.f64 M D) (.f64 M (.f64 h #s(literal 1/8 binary64)))) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -3873374817130363/2582249878086908589655919172003011874329705792829223512830659356540647622016841194629645353280137831435903171972747493376 binary64)) (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (if (<=.f64 d #s(literal 1250000000000000021695835521211410866903344077186913201546055403902315923184530140615516337539855632424837203960271559416959075082968536574030926348960006730273314211586172078014857216 binary64)) (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.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 1059999999999999930388292027983344754843664428763141022981934069001250365484129639919608417349973935242093680941308007662414284718080 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -1150000000000000078831913830141112840176583575866707171878036024146675344687529279560804728832 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 d #s(literal -3149641043687537/8749002899132047697490008908470485461412677723572849745703082425639811996797503692894052708092215296 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 h #s(literal 1/8 binary64)) (.f64 M (.f64 M (.f64 D D)))) (.f64 d (.f64 d l))))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 1019999999999999921578371427941963947889353975382557886308037890684419231647046021004041896803313785580480993656650715127614122870272159410895309068304384 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 1019999999999999921578371427941963947889353975382557886308037890684419231647046021004041896803313785580480993656650715127614122870272159410895309068304384 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 942707696001077/11090678776483259438313656736572334813745748301503266300681918322458485231222502492159897624416558312389564843845614287315896631296 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1/8 binary64) d) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M (.f64 D (.f64 M D)))))) (if (<=.f64 d #s(literal 942707696001077/11090678776483259438313656736572334813745748301503266300681918322458485231222502492159897624416558312389564843845614287315896631296 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 M (.f64 D (.f64 M D))))) (if (<=.f64 d #s(literal 942707696001077/11090678776483259438313656736572334813745748301503266300681918322458485231222502492159897624416558312389564843845614287315896631296 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 942707696001077/11090678776483259438313656736572334813745748301503266300681918322458485231222502492159897624416558312389564843845614287315896631296 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -2616539473979321/76957043352332967211482500195592995713046365762627825523336510555167425334955489475418488779072100860950445293568 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M M) (/.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal 6325070415853457/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal -5343967014842033/4646927838993072071243945306718439250410188130185607684549287060362314553626263667328650982800488595593121011844353040782670578892327830336846345565944983205571783876398312106070895030732180427719497486819848241268961714708993375275490934188589556509412640954544199727574266715045888 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(if (<=.f64 d #s(literal -3873374817130363/2582249878086908589655919172003011874329705792829223512830659356540647622016841194629645353280137831435903171972747493376 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l))))

Outputs
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) 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)) (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))))))
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (+.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 (+.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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (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 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 (.f64 M D) (.f64 d #s(literal 2 binary64))) 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 l #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)))) #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))) (.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 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 h)))))
(if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (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))))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (if (<=.f64 d #s(literal 6799999999999999600761687959785736980751714813767260445075857450734287686705592628609537092193780965273497487309849879737241886711016945324189265290160455191404946415534601142272 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l 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))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 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)))) #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 l d))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (if (<=.f64 d #s(literal 6799999999999999600761687959785736980751714813767260445075857450734287686705592628609537092193780965273497487309849879737241886711016945324189265290160455191404946415534601142272 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)) (sqrt.f64 (/.f64 l d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (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))))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (if (<=.f64 d #s(literal 6799999999999999600761687959785736980751714813767260445075857450734287686705592628609537092193780965273497487309849879737241886711016945324189265290160455191404946415534601142272 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (-.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 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)))) #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 l d))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (if (<=.f64 d #s(literal 6799999999999999600761687959785736980751714813767260445075857450734287686705592628609537092193780965273497487309849879737241886711016945324189265290160455191404946415534601142272 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (-.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)))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 d #s(literal -6059594836091061/123665200736552267030251260509823595017565674550605919957031528046448612553265933585158200530621522494798835713008069669675682517153375604983773077550946583958303386074349568 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (-.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 d #s(literal 4084213920990005/4538015467766671944574165338592225830478699345884382504442663144885072806275648112625635725391102144133907238129251016389326737199538896813326509341743147661691195191795226666084858428449394948944821764472508048114220424520501343042471615418544488778723282182172070046459244838912 binary64)) #s(approx (/ ( (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ h d))) (.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 (.f64 h h) l)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 #s(literal -1/8 binary64) (.f64 M (.f64 M (.f64 D D))))) d)))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (if (<=.f64 d #s(literal 6799999999999999600761687959785736980751714813767260445075857450734287686705592628609537092193780965273497487309849879737241886711016945324189265290160455191404946415534601142272 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (-.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -6059594836091061/123665200736552267030251260509823595017565674550605919957031528046448612553265933585158200530621522494798835713008069669675682517153375604983773077550946583958303386074349568 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (-.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)))))) (if (<=.f64 d #s(literal 4084213920990005/4538015467766671944574165338592225830478699345884382504442663144885072806275648112625635725391102144133907238129251016389326737199538896813326509341743147661691195191795226666084858428449394948944821764472508048114220424520501343042471615418544488778723282182172070046459244838912 binary64)) #s(approx (/ ( (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ h d))) (.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 h h))))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 #s(literal -1/8 binary64) (.f64 M (.f64 M (.f64 D D))))) d)))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 l d))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (if (<=.f64 d #s(literal 6799999999999999600761687959785736980751714813767260445075857450734287686705592628609537092193780965273497487309849879737241886711016945324189265290160455191404946415534601142272 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (-.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)))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))))
(if (<=.f64 d #s(literal -3339993601068869/115172193140305827399949785796761135587064246228529065807379342658863042065190089480167441564259605943037975312218134915154131611020654072038617988630148194691448832 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (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))) (if (<=.f64 d #s(literal 4084213920990005/4538015467766671944574165338592225830478699345884382504442663144885072806275648112625635725391102144133907238129251016389326737199538896813326509341743147661691195191795226666084858428449394948944821764472508048114220424520501343042471615418544488778723282182172070046459244838912 binary64)) #s(approx (/ ( (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ h d))) (.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 (.f64 h h) l)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 #s(literal -1/8 binary64) (.f64 M (.f64 M (.f64 D D))))) d)))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (if (<=.f64 d #s(literal 6500000000000000160891218127062988864636429792940046642080104476080074868559694357010118713217592637631043569515371629592238085751285903770295351454613044666340382354471951269888 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (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))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -3339993601068869/115172193140305827399949785796761135587064246228529065807379342658863042065190089480167441564259605943037975312218134915154131611020654072038617988630148194691448832 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (fma.f64 (/.f64 (.f64 M D) (.f64 l (.f64 d #s(literal 2 binary64)))) (.f64 (neg.f64 h) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d))) #s(literal 1 binary64))) (if (<=.f64 d #s(literal 4084213920990005/4538015467766671944574165338592225830478699345884382504442663144885072806275648112625635725391102144133907238129251016389326737199538896813326509341743147661691195191795226666084858428449394948944821764472508048114220424520501343042471615418544488778723282182172070046459244838912 binary64)) #s(approx (/ ( (sqrt (/ d l)) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt (/ h d))) (.f64 h (fma.f64 d (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 h h))))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h (.f64 l (.f64 l l))))) (.f64 #s(literal -1/8 binary64) (.f64 M (.f64 M (.f64 D D))))) d)))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 l d))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (if (<=.f64 d #s(literal 6500000000000000160891218127062988864636429792940046642080104476080074868559694357010118713217592637631043569515371629592238085751285903770295351454613044666340382354471951269888 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (fma.f64 (/.f64 (.f64 M D) (.f64 l (.f64 d #s(literal 2 binary64)))) (.f64 (neg.f64 h) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d))) #s(literal 1 binary64))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))))
(if (<=.f64 d #s(literal -3339993601068869/115172193140305827399949785796761135587064246228529065807379342658863042065190089480167441564259605943037975312218134915154131611020654072038617988630148194691448832 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (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))) (if (<=.f64 d #s(literal 1452164949685335/290432989937067004452746581669902453150636758136600480284330441272644659601641479208040686425030537224570063240272065048916911180770489396052896597871561450348236492274894506629430939420761276732468592926240515079310107169312085954718183386786847281838290059659012482973391669690368 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 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)))))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (if (<=.f64 d #s(literal 6500000000000000160891218127062988864636429792940046642080104476080074868559694357010118713217592637631043569515371629592238085751285903770295351454613044666340382354471951269888 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (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))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -3339993601068869/115172193140305827399949785796761135587064246228529065807379342658863042065190089480167441564259605943037975312218134915154131611020654072038617988630148194691448832 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (fma.f64 (/.f64 (.f64 M D) (.f64 l (.f64 d #s(literal 2 binary64)))) (.f64 (neg.f64 h) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d))) #s(literal 1 binary64))) (if (<=.f64 d #s(literal 1452164949685335/290432989937067004452746581669902453150636758136600480284330441272644659601641479208040686425030537224570063240272065048916911180770489396052896597871561450348236492274894506629430939420761276732468592926240515079310107169312085954718183386786847281838290059659012482973391669690368 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 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)))))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 l d))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (if (<=.f64 d #s(literal 6500000000000000160891218127062988864636429792940046642080104476080074868559694357010118713217592637631043569515371629592238085751285903770295351454613044666340382354471951269888 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (fma.f64 (/.f64 (.f64 M D) (.f64 l (.f64 d #s(literal 2 binary64)))) (.f64 (neg.f64 h) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d))) #s(literal 1 binary64))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))))
(if (<=.f64 d #s(literal -5623642243178995/14059105607947488696282932836518693308967803494693489478439861164411992439598399594747002144074658928593502845729752797260025831423419686528151609940203637047296 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (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))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1/8 binary64) d) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M (.f64 D (.f64 M D)))))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (if (<=.f64 d #s(literal 6500000000000000160891218127062988864636429792940046642080104476080074868559694357010118713217592637631043569515371629592238085751285903770295351454613044666340382354471951269888 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (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))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -5623642243178995/14059105607947488696282932836518693308967803494693489478439861164411992439598399594747002144074658928593502845729752797260025831423419686528151609940203637047296 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (fma.f64 (/.f64 (.f64 M D) (.f64 l (.f64 d #s(literal 2 binary64)))) (.f64 (neg.f64 h) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d))) #s(literal 1 binary64))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1/8 binary64) d) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M (.f64 D (.f64 M D)))))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 l d))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (if (<=.f64 d #s(literal 6500000000000000160891218127062988864636429792940046642080104476080074868559694357010118713217592637631043569515371629592238085751285903770295351454613044666340382354471951269888 binary64)) (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) (sqrt.f64 (/.f64 l d))) (fma.f64 (/.f64 (.f64 M D) (.f64 l (.f64 d #s(literal 2 binary64)))) (.f64 (neg.f64 h) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 M D) d))) #s(literal 1 binary64))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))))
(if (<=.f64 d #s(literal -3873374817130363/2582249878086908589655919172003011874329705792829223512830659356540647622016841194629645353280137831435903171972747493376 binary64)) (/.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 D (/.f64 (.f64 (.f64 M D) (.f64 M (.f64 h #s(literal 1/8 binary64)))) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (if (<=.f64 d #s(literal 1250000000000000021695835521211410866903344077186913201546055403902315923184530140615516337539855632424837203960271559416959075082968536574030926348960006730273314211586172078014857216 binary64)) (/.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 D (/.f64 (.f64 (.f64 M D) (.f64 M (.f64 h #s(literal 1/8 binary64)))) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -3873374817130363/2582249878086908589655919172003011874329705792829223512830659356540647622016841194629645353280137831435903171972747493376 binary64)) (/.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 D (/.f64 (.f64 (.f64 M D) (.f64 M (.f64 h #s(literal 1/8 binary64)))) (.f64 l d))) d)))) (sqrt.f64 (/.f64 h d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 l d))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (if (<=.f64 d #s(literal 1250000000000000021695835521211410866903344077186913201546055403902315923184530140615516337539855632424837203960271559416959075082968536574030926348960006730273314211586172078014857216 binary64)) (/.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 D (/.f64 (.f64 (.f64 M D) (.f64 M (.f64 h #s(literal 1/8 binary64)))) (.f64 l d))) d)))) (sqrt.f64 (/.f64 h d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))))
(if (<=.f64 d #s(literal -3873374817130363/2582249878086908589655919172003011874329705792829223512830659356540647622016841194629645353280137831435903171972747493376 binary64)) (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 d l))))) (/.f64 d (sqrt.f64 (.f64 h l)))) (if (<=.f64 d #s(literal 1250000000000000021695835521211410866903344077186913201546055403902315923184530140615516337539855632424837203960271559416959075082968536574030926348960006730273314211586172078014857216 binary64)) (/.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 D (/.f64 (.f64 M (.f64 (.f64 M (.f64 h #s(literal 1/8 binary64))) D)) (.f64 d l))) d)))) (sqrt.f64 (/.f64 h d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -3873374817130363/2582249878086908589655919172003011874329705792829223512830659356540647622016841194629645353280137831435903171972747493376 binary64)) (/.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 D (/.f64 (.f64 M (.f64 D (.f64 M (.f64 h #s(literal 1/8 binary64))))) (.f64 l d))) d)))) (sqrt.f64 (/.f64 h d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 5246140168319413/169230328010303641331690318856389386196071598838855992136870091590247882556495704531248437872567112920983350278405979725889536 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 l d))))) (/.f64 d (sqrt.f64 (.f64 l h)))) (if (<=.f64 d #s(literal 1250000000000000021695835521211410866903344077186913201546055403902315923184530140615516337539855632424837203960271559416959075082968536574030926348960006730273314211586172078014857216 binary64)) (/.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 D (/.f64 (.f64 M (.f64 D (.f64 M (.f64 h #s(literal 1/8 binary64))))) (.f64 l d))) d)))) (sqrt.f64 (/.f64 h d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))))
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.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 1059999999999999930388292027983344754843664428763141022981934069001250365484129639919608417349973935242093680941308007662414284718080 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (sqrt (/ d l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l 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 l d)))))) (if (<=.f64 l #s(literal 1059999999999999930388292027983344754843664428763141022981934069001250365484129639919608417349973935242093680941308007662414284718080 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 l d))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))
(if (<=.f64 d #s(literal -1150000000000000078831913830141112840176583575866707171878036024146675344687529279560804728832 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 d #s(literal -3149641043687537/8749002899132047697490008908470485461412677723572849745703082425639811996797503692894052708092215296 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 h #s(literal 1/8 binary64)) (.f64 M (.f64 M (.f64 D D)))) (.f64 d (.f64 d l))))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 1019999999999999921578371427941963947889353975382557886308037890684419231647046021004041896803313785580480993656650715127614122870272159410895309068304384 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))))
(if (<=.f64 d #s(literal -1150000000000000078831913830141112840176583575866707171878036024146675344687529279560804728832 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (if (<=.f64 d #s(literal -3149641043687537/8749002899132047697490008908470485461412677723572849745703082425639811996797503692894052708092215296 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 h #s(literal 1/8 binary64)) (.f64 M (.f64 M (.f64 D D)))) (.f64 d (.f64 l d))))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 l h)))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 1019999999999999921578371427941963947889353975382557886308037890684419231647046021004041896803313785580480993656650715127614122870272159410895309068304384 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 l d))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 1019999999999999921578371427941963947889353975382557886308037890684419231647046021004041896803313785580480993656650715127614122870272159410895309068304384 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.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 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 1019999999999999921578371427941963947889353975382557886308037890684419231647046021004041896803313785580480993656650715127614122870272159410895309068304384 binary64)) (.f64 (-.f64 #s(literal 1 binary64) #s(approx ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/.f64 (.f64 (.f64 M D) (.f64 (.f64 M D) (.f64 h #s(literal 1/8 binary64)))) (.f64 d (.f64 l d))))) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 942707696001077/11090678776483259438313656736572334813745748301503266300681918322458485231222502492159897624416558312389564843845614287315896631296 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 (/.f64 h (.f64 l l)) l)) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 942707696001077/11090678776483259438313656736572334813745748301503266300681918322458485231222502492159897624416558312389564843845614287315896631296 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1/8 binary64) d) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M (.f64 D (.f64 M D)))))) (if (<=.f64 d #s(literal 942707696001077/11090678776483259438313656736572334813745748301503266300681918322458485231222502492159897624416558312389564843845614287315896631296 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (/.f64 #s(literal 1/8 binary64) d) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 M (.f64 D (.f64 M D)))))) (if (<=.f64 d #s(literal 942707696001077/11090678776483259438313656736572334813745748301503266300681918322458485231222502492159897624416558312389564843845614287315896631296 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 #s(literal 1/8 binary64) d)) (.f64 M (.f64 D (.f64 M D))))) (if (<=.f64 d #s(literal 942707696001077/11090678776483259438313656736572334813745748301503266300681918322458485231222502492159897624416558312389564843845614287315896631296 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 M (.f64 D (.f64 M D))) (.f64 (/.f64 #s(literal 1/8 binary64) d) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))) (if (<=.f64 d #s(literal 942707696001077/11090678776483259438313656736572334813745748301503266300681918322458485231222502492159897624416558312389564843845614287315896631296 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 942707696001077/11090678776483259438313656736572334813745748301503266300681918322458485231222502492159897624416558312389564843845614287315896631296 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) (if (<=.f64 d #s(literal 942707696001077/11090678776483259438313656736572334813745748301503266300681918322458485231222502492159897624416558312389564843845614287315896631296 binary64)) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 D D) (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) d) (sqrt.f64 (/.f64 h (.f64 l (.f64 l l))))))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -2404907604760405/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M (.f64 M (.f64 D D))) (/.f64 #s(literal 1/8 binary64) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))
(if (<=.f64 d #s(literal -2616539473979321/76957043352332967211482500195592995713046365762627825523336510555167425334955489475418488779072100860950445293568 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M M) (/.f64 (.f64 (.f64 D D) #s(literal 1/8 binary64)) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -2616539473979321/76957043352332967211482500195592995713046365762627825523336510555167425334955489475418488779072100860950445293568 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (if (<=.f64 d #s(literal -1992397180993839/3162535207926728411757739792483082922649322652564720599326583719178599055749927295186880995334955070237298091629950186115465761521653023076047084374074039217523709754321349396319795433470206505331871369976136641696281366928510823415907864932018118067825157133005605774255209603362976602065411367322593847864182933454585856 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 h (.f64 l (.f64 l l)))) (.f64 (.f64 M M) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) d)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l))))))
(if (<=.f64 l #s(literal 6325070415853457/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 6325070415853457/12650140831706913647030959169932331690597290610258882397306334876714396222999709180747523981339820280949192366519800744461863046086612092304188337496296156870094839017285397585279181733880826021327485479904546566785125467714043293663631459728072472271300628532022423097020838413451906408261645469290375391456731733818343424 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 h) (sqrt.f64 l)))))
(if (<=.f64 d #s(literal -5343967014842033/4646927838993072071243945306718439250410188130185607684549287060362314553626263667328650982800488595593121011844353040782670578892327830336846345565944983205571783876398312106070895030732180427719497486819848241268961714708993375275490934188589556509412640954544199727574266715045888 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 h l))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(if (<=.f64 d #s(literal -5343967014842033/4646927838993072071243945306718439250410188130185607684549287060362314553626263667328650982800488595593121011844353040782670578892327830336846345565944983205571783876398312106070895030732180427719497486819848241268961714708993375275490934188589556509412640954544199727574266715045888 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(if (<=.f64 d #s(literal -3873374817130363/2582249878086908589655919172003011874329705792829223512830659356540647622016841194629645353280137831435903171972747493376 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 h l)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l)))))
(if (<=.f64 d #s(literal -3873374817130363/2582249878086908589655919172003011874329705792829223512830659356540647622016841194629645353280137831435903171972747493376 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (/.f64 (.f64 d d) (.f64 l h)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 h l))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))

soundness2.9s (13.1%)

Memory

-24.4MiB live, 1 764.5MiB allocated

Rules

11 250×	`lower-*.f64`
11 250×	`lower-*.f32`
7 588×	`lower-fma.f64`
7 588×	`lower-fma.f32`
7 330×	`lower-*.f32`

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
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	219	13796
1	617	13439
2	2256	13372
3	4116	13325
4	7636	13325
0	8208	13166
0	65	213
0	113	208
1	340	189
2	2263	185
0	8323	184
0	79	357
0	130	349
1	438	313
2	2748	309
0	8109	308
0	135	9127
1	361	9000
2	1257	8983
3	2789	8951
4	5145	8951
0	8524	8870
0	82	464
0	136	442
1	461	414
2	3461	406
0	10299	402

Stop Event

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

Compiler

Compiled 9 887 to 4 235 computations (57.2% saved)

preprocess139.0ms (0.6%)

Memory

25.5MiB live, 252.9MiB allocated

Remove

(sort M D)

(abs M)

(abs D)

Compiler

Compiled 5 074 to 980 computations (80.7% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated