Metrics for Henrywood and Agarwal, Equation (12)

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze448.0ms (2.5%)

Memory

1.6MiB live, 737.3MiB allocated

Algorithm

1×

Search

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

Compiler

Compiled 37 to 24 computations (35.1% saved)

sample6.1s (33.9%)

Memory

40.5MiB live, 7 562.6MiB allocated

Samples

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

Precisions

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

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

ival-div: 1.0s (30.2% of total)

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

ival-pow2: 317.0ms (9.5% of total)

ival-sub: 149.0ms (4.4% of total)

exact: 22.0ms (0.7% of total)

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

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

Bogosity

explain348.0ms (2%)

Memory

-20.2MiB live, 516.6MiB allocated

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
68	-	5	(-7.706041749276411e-142 -4.1324673968831254e-65 -3.491338923227874e+174 -2.4958874559471553e+238 2.561729014774272e+44)	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
63	-	4	(-3.8707119704430716e-274 -7.579487843546576e+40 -1.621869241320107e+77 1.6936875925243196e+79 -5.894337931547175e-99)	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`
41	-	1	(1.5631316463205475e-234 1.2889531125575271e+126 1.082448686487474e+61 -1.5289591263153644e-94 -1.2620169290716067e-297)	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`
32	-	1	(2.337456275365869e-29 1.6571637134784078e-252 6.128285443106185e-98 -5.0321689947584675e-43 -7.258378984816644e-269)	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`
23	-	1	(4.569770730152844e-120 9.452902129490926e+127 3.944850207702945e+277 -1.2161534553257373e-150 -2.0066362910666842e+158)	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
0	-	0	-	`D`
0	-	0	-	`(*.f64 #s(literal 2 binary64) d)`
0	-	0	-	`(/.f64 h l)`
0	-	0	-	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`
0	-	0	-	`d`
0	-	0	-	`#s(literal 1 binary64)`
0	-	0	-	`(/.f64 d l)`
0	-	0	-	`(*.f64 M D)`
0	-	0	-	`(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))`
0	-	0	-	`(/.f64 d h)`
0	-	0	-	`(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))`
0	-	0	-	`#s(literal 2 binary64)`
0	-	0	-	`l`
0	-	0	-	`(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))`
0	-	0	-	`M`
0	-	0	-	`h`
0	-	0	-	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`pow.f64`	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	36	0
↳	`(/.f64 d l)`	overflow	36
`pow.f64`	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	oflow-rescue	32	0
↳	`(/.f64 d h)`	overflow	32
`pow.f64`	`(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	uflow-rescue	27	0
↳	`(/.f64 d l)`	underflow	27
`pow.f64`	`(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))`	uflow-rescue	27	0
↳	`(/.f64 d h)`	underflow	27
`/.f64`	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	o/n	15	0
↳	`(*.f64 M D)`	overflow	39
`*.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**	9	0
`*.f64`	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`	*uo**	9	0
↳	`(/.f64 d h)`	underflow	27
↳	`(/.f64 d l)`	underflow	27
↳	`(*.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))`	underflow	21
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	81
↳	`(.f64 (/.f64 #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	81
↳	`(/.f64 h l)`	overflow	26
↳	`(-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))`	overflow	78
↳	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`	overflow	78
↳	`(*.f64 M D)`	overflow	39
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	44
`*.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**	7	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))))`	*nu**	4	0
`*.f64`	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`	*uo**	4	0
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	underflow	83
↳	`(.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)))`	underflow	83
↳	`(*.f64 M D)`	underflow	32
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	underflow	36
↳	`(/.f64 h l)`	overflow	26
`*.f64`	`(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))`	*ou**	4	0
↳	`(pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))`	overflow	81
↳	`(.f64 (/.f64 #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	81
↳	`(*.f64 M D)`	overflow	39
↳	`(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))`	overflow	44
↳	`(/.f64 h l)`	underflow	26

Confusion

	Predicted +	Predicted -
+	79	5
-	40	132

Precision

0.6638655462184874

Recall

0.9404761904761905

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	79	0	5
-	40	0	132

Precision?

0.6638655462184874

Recall?

0.9404761904761905

Freqs

test

number	freq
0	137
1	77
2	29
3	13

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

114.0ms

512×

valid

Compiler

Compiled 501 to 92 computations (81.6% saved)

Precisions

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

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

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

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

ival-mult: 20.0ms (23.3% of total)

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

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

exact: 1.0ms (1.2% of total)

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

preprocess179.0ms (1%)

Memory

-5.9MiB live, 147.0MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Calls

Call 1

Inputs

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

Outputs

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

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

Symmetry

(abs D)

(abs M)

(sort M D)

Compiler

Compiled 35 to 22 computations (37.1% saved)

eval0.0ms (0%)

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

prune1.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated

Alt Table

Click to see full alt table

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

Status

Accuracy

Program

▶

68.2%

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

Compiler

Compiled 35 to 22 computations (37.1% saved)

simplify104.0ms (0.6%)

Memory

9.9MiB live, 119.5MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

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

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Calls

Call 1

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

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

localize101.0ms (0.6%)

Memory

-20.1MiB live, 101.2MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	7.184414076822916	(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))
accuracy	9.32009716911516	(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
accuracy	14.352929770582946	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	15.438360805806225	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

84.0ms

256×

valid

Compiler

Compiled 310 to 46 computations (85.2% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

series57.0ms (0.3%)

Memory

5.6MiB live, 123.0MiB allocated

Counts

6 → 204

Calls

Call 1

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

Calls

15 calls:

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

simplify162.0ms (0.9%)

Memory

-1.6MiB live, 202.8MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	62	2502
1	172	2470
2	621	2470
3	3321	2470
4	5958	2470
5	7982	2470
0	8092	2425

Stop Event

1×	iter limit
1×	node limit

Counts

204 → 204

Calls

Call 1

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

rewrite168.0ms (0.9%)

Memory

36.7MiB live, 216.3MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	20	50
0	34	48
1	114	48
2	719	48
3	7801	48
0	8835	47

Stop Event

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

Counts

6 → 393

Calls

Call 1

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

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

eval116.0ms (0.6%)

Memory: 2.6MiB live, 193.2MiB allocated
Compiler: Compiled 24 168 to 1 963 computations (91.9% saved)

prune48.0ms (0.3%)

Memory

7.0MiB live, 119.5MiB allocated

Pruning

23 alts after pruning (23 fresh and 0 done)

	Pruned	Kept	Total
New	576	23	599
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	577	23	600

Accuracy

85.6%

Counts

600 → 23

Alt Table

Click to see full alt table

Status	Accuracy	Program
	67.3%	(.f64 (.f64 (pow.f64 (pow.f64 (/.f64 h d) #s(literal -1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	70.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 (/.f64 (/.f64 d D) M) #s(literal 2 binary64)) #s(literal -2 binary64))) l) h #s(literal 1 binary64)))
	70.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (fma.f64 (.f64 (/.f64 (neg.f64 h) l) (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D)) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #s(literal 1 binary64)))
	64.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 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M #s(literal 1/2 binary64)) D)) (.f64 (.f64 d (/.f64 d D)) (/.f64 #s(literal 2 binary64) M)))))
▶	72.6%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	67.8%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (.f64 (/.f64 D d) (.f64 M #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 h l))))
	65.7%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (/.f64 D d) (.f64 (.f64 M M) #s(literal 1/4 binary64)))) (/.f64 D d))))
	66.6%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 h l) #s(literal 1/2 binary64)) (.f64 (.f64 D #s(literal 1/2 binary64)) (.f64 (/.f64 M d) M))) (*.f64 (/.f64 #s(literal 1/2 binary64) d) D))))
	56.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (/.f64 #s(literal 1/8 binary64) (.f64 d d)) D) (.f64 (/.f64 (.f64 (.f64 M M) h) l) D)))))
	28.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)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64)) d) l) (/.f64 (*.f64 D D) d))))
▶	40.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)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
▶	36.9%	(.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))))
▶	35.8%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.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))))
	68.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 l d)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	34.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (.f64 (pow.f64 (/.f64 l d) #s(literal -1/4 binary64)) (pow.f64 d #s(literal 1/4 binary64))) (pow.f64 l #s(literal -1/4 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	36.9%	(.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))))
	68.2%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (sqrt.f64 (/.f64 d l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	38.0%	(.f64 (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	37.3%	(.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	67.4%	(.f64 (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 h d))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	37.3%	(.f64 (.f64 (.f64 (pow.f64 h #s(literal -1/2 binary64)) (sqrt.f64 d)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
▶	38.0%	(.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (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))))
	38.0%	(.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (*.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))

Compiler

Compiled 1 610 to 1 118 computations (30.6% saved)

simplify187.0ms (1%)

Memory

9.1MiB live, 246.4MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	65	699
0	113	678
1	200	660
2	538	652
3	3108	652
4	6808	652
0	8578	642

Stop Event

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

Calls

Call 1

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

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

localize253.0ms (1.4%)

Memory

2.1MiB live, 352.9MiB allocated

Localize:

Found 20 expressions of interest:

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

Samples

143.0ms

256×

invalid

Compiler

Compiled 1 518 to 113 computations (92.6% saved)

Precisions

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

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

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

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

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

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

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

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

exact: 1.0ms (1.3% of total)

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

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

series162.0ms (0.9%)

Memory

-12.3MiB live, 167.5MiB allocated

Counts

25 → 684

Calls

Call 1

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

Outputs
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor 0 h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor 0 h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor 0 h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor 0 h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* (sqrt h) (sqrt -1)) (taylor 0 h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt h) (sqrt -1)) (taylor 0 h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt h) (sqrt -1)) (taylor 0 h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt h) (sqrt -1)) (taylor 0 h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* (sqrt h) (sqrt -1)) (taylor inf h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt h) (sqrt -1)) (taylor inf h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt h) (sqrt -1)) (taylor inf h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt h) (sqrt -1)) (taylor inf h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor -inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor -inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor -inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 h) (taylor -inf h) (#s(alt (neg.f64 h) (patch (neg.f64 h) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt h) (sqrt -1))) (taylor -inf h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt h) (sqrt -1))) (taylor -inf h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt h) (sqrt -1))) (taylor -inf h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt h) (sqrt -1))) (taylor -inf h) (#s(alt (sqrt.f64 (neg.f64 h)) (patch (sqrt.f64 (neg.f64 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 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor 0 M) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor 0 M) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor 0 M) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor 0 M) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor inf M) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor inf M) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor inf M) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor inf M) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor -inf M) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor -inf M) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor -inf M) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor -inf M) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt l) (taylor 0 l) (#s(alt (sqrt.f64 l) (patch (sqrt.f64 l) #<representation binary64>) () ())) ())
#s(alt (sqrt l) (taylor 0 l) (#s(alt (sqrt.f64 l) (patch (sqrt.f64 l) #<representation binary64>) () ())) ())
#s(alt (sqrt l) (taylor 0 l) (#s(alt (sqrt.f64 l) (patch (sqrt.f64 l) #<representation binary64>) () ())) ())
#s(alt (sqrt l) (taylor 0 l) (#s(alt (sqrt.f64 l) (patch (sqrt.f64 l) #<representation binary64>) () ())) ())
#s(alt (* -1 l) (taylor 0 l) (#s(alt (neg.f64 l) (patch (neg.f64 l) #<representation binary64>) () ())) ())
#s(alt (* -1 l) (taylor 0 l) (#s(alt (neg.f64 l) (patch (neg.f64 l) #<representation binary64>) () ())) ())
#s(alt (* -1 l) (taylor 0 l) (#s(alt (neg.f64 l) (patch (neg.f64 l) #<representation binary64>) () ())) ())
#s(alt (* -1 l) (taylor 0 l) (#s(alt (neg.f64 l) (patch (neg.f64 l) #<representation binary64>) () ())) ())
#s(alt (* (sqrt l) (sqrt -1)) (taylor 0 l) (#s(alt (sqrt.f64 (neg.f64 l)) (patch (sqrt.f64 (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt l) (sqrt -1)) (taylor 0 l) (#s(alt (sqrt.f64 (neg.f64 l)) (patch (sqrt.f64 (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt l) (sqrt -1)) (taylor 0 l) (#s(alt (sqrt.f64 (neg.f64 l)) (patch (sqrt.f64 (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt l) (sqrt -1)) (taylor 0 l) (#s(alt (sqrt.f64 (neg.f64 l)) (patch (sqrt.f64 (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt l) (taylor inf l) (#s(alt (sqrt.f64 l) (patch (sqrt.f64 l) #<representation binary64>) () ())) ())
#s(alt (sqrt l) (taylor inf l) (#s(alt (sqrt.f64 l) (patch (sqrt.f64 l) #<representation binary64>) () ())) ())
#s(alt (sqrt l) (taylor inf l) (#s(alt (sqrt.f64 l) (patch (sqrt.f64 l) #<representation binary64>) () ())) ())
#s(alt (sqrt l) (taylor inf l) (#s(alt (sqrt.f64 l) (patch (sqrt.f64 l) #<representation binary64>) () ())) ())
#s(alt (* -1 l) (taylor inf l) (#s(alt (neg.f64 l) (patch (neg.f64 l) #<representation binary64>) () ())) ())
#s(alt (* -1 l) (taylor inf l) (#s(alt (neg.f64 l) (patch (neg.f64 l) #<representation binary64>) () ())) ())
#s(alt (* -1 l) (taylor inf l) (#s(alt (neg.f64 l) (patch (neg.f64 l) #<representation binary64>) () ())) ())
#s(alt (* -1 l) (taylor inf l) (#s(alt (neg.f64 l) (patch (neg.f64 l) #<representation binary64>) () ())) ())
#s(alt (* (sqrt l) (sqrt -1)) (taylor inf l) (#s(alt (sqrt.f64 (neg.f64 l)) (patch (sqrt.f64 (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt l) (sqrt -1)) (taylor inf l) (#s(alt (sqrt.f64 (neg.f64 l)) (patch (sqrt.f64 (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt l) (sqrt -1)) (taylor inf l) (#s(alt (sqrt.f64 (neg.f64 l)) (patch (sqrt.f64 (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt l) (sqrt -1)) (taylor inf l) (#s(alt (sqrt.f64 (neg.f64 l)) (patch (sqrt.f64 (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (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))) (/.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)))) (patch (.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)))) #<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))) (/.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)))) (patch (.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)))) #<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))) (/.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)))) (patch (.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)))) #<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))) (/.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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt l) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 l) (patch (sqrt.f64 l) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt l) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 l) (patch (sqrt.f64 l) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt l) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 l) (patch (sqrt.f64 l) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt l) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 l) (patch (sqrt.f64 l) #<representation binary64>) () ())) ())
#s(alt (* -1 l) (taylor -inf l) (#s(alt (neg.f64 l) (patch (neg.f64 l) #<representation binary64>) () ())) ())
#s(alt (* -1 l) (taylor -inf l) (#s(alt (neg.f64 l) (patch (neg.f64 l) #<representation binary64>) () ())) ())
#s(alt (* -1 l) (taylor -inf l) (#s(alt (neg.f64 l) (patch (neg.f64 l) #<representation binary64>) () ())) ())
#s(alt (* -1 l) (taylor -inf l) (#s(alt (neg.f64 l) (patch (neg.f64 l) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt l) (sqrt -1))) (taylor -inf l) (#s(alt (sqrt.f64 (neg.f64 l)) (patch (sqrt.f64 (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt l) (sqrt -1))) (taylor -inf l) (#s(alt (sqrt.f64 (neg.f64 l)) (patch (sqrt.f64 (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt l) (sqrt -1))) (taylor -inf l) (#s(alt (sqrt.f64 (neg.f64 l)) (patch (sqrt.f64 (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt l) (sqrt -1))) (taylor -inf l) (#s(alt (sqrt.f64 (neg.f64 l)) (patch (sqrt.f64 (neg.f64 l)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor 0 D) (#s(alt (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (patch (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor 0 D) (#s(alt (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (patch (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor 0 D) (#s(alt (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (patch (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor 0 D) (#s(alt (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (patch (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 D) (taylor 0 D) (#s(alt (.f64 D #s(literal 1/2 binary64)) (patch (.f64 D #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 D) (taylor 0 D) (#s(alt (.f64 D #s(literal 1/2 binary64)) (patch (.f64 D #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 D) (taylor 0 D) (#s(alt (.f64 D #s(literal 1/2 binary64)) (patch (.f64 D #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 D) (taylor 0 D) (#s(alt (.f64 D #s(literal 1/2 binary64)) (patch (.f64 D #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor 0 D) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor 0 D) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor 0 D) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor 0 D) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor inf D) (#s(alt (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (patch (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor inf D) (#s(alt (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (patch (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor inf D) (#s(alt (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (patch (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor inf D) (#s(alt (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (patch (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 D) (taylor inf D) (#s(alt (.f64 D #s(literal 1/2 binary64)) (patch (.f64 D #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 D) (taylor inf D) (#s(alt (.f64 D #s(literal 1/2 binary64)) (patch (.f64 D #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 D) (taylor inf D) (#s(alt (.f64 D #s(literal 1/2 binary64)) (patch (.f64 D #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 D) (taylor inf D) (#s(alt (.f64 D #s(literal 1/2 binary64)) (patch (.f64 D #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor inf D) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor inf D) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor inf D) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor inf D) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor -inf D) (#s(alt (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (patch (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor -inf D) (#s(alt (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (patch (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor -inf D) (#s(alt (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (patch (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 D) (taylor -inf D) (#s(alt (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (patch (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 D) (taylor -inf D) (#s(alt (.f64 D #s(literal 1/2 binary64)) (patch (.f64 D #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 D) (taylor -inf D) (#s(alt (.f64 D #s(literal 1/2 binary64)) (patch (.f64 D #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 D) (taylor -inf D) (#s(alt (.f64 D #s(literal 1/2 binary64)) (patch (.f64 D #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 D) (taylor -inf D) (#s(alt (.f64 D #s(literal 1/2 binary64)) (patch (.f64 D #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor -inf D) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor -inf D) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor -inf D) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* D M) (taylor -inf D) (#s(alt (.f64 M D) (patch (.f64 M D) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor 0 d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* 2 d) (taylor 0 d) (#s(alt (.f64 #s(literal 2 binary64) d) (patch (.f64 #s(literal 2 binary64) d) #<representation binary64>) () ())) ())
#s(alt (* 2 d) (taylor 0 d) (#s(alt (.f64 #s(literal 2 binary64) d) (patch (.f64 #s(literal 2 binary64) d) #<representation binary64>) () ())) ())
#s(alt (* 2 d) (taylor 0 d) (#s(alt (.f64 #s(literal 2 binary64) d) (patch (.f64 #s(literal 2 binary64) d) #<representation binary64>) () ())) ())
#s(alt (* 2 d) (taylor 0 d) (#s(alt (.f64 #s(literal 2 binary64) d) (patch (.f64 #s(literal 2 binary64) d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor 0 d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor 0 d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor 0 d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor 0 d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* (sqrt d) (sqrt -1)) (taylor 0 d) (#s(alt (sqrt.f64 (neg.f64 d)) (patch (sqrt.f64 (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt d) (sqrt -1)) (taylor 0 d) (#s(alt (sqrt.f64 (neg.f64 d)) (patch (sqrt.f64 (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt d) (sqrt -1)) (taylor 0 d) (#s(alt (sqrt.f64 (neg.f64 d)) (patch (sqrt.f64 (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt d) (sqrt -1)) (taylor 0 d) (#s(alt (sqrt.f64 (neg.f64 d)) (patch (sqrt.f64 (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (sqrt d) (taylor inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* 2 d) (taylor inf d) (#s(alt (.f64 #s(literal 2 binary64) d) (patch (.f64 #s(literal 2 binary64) d) #<representation binary64>) () ())) ())
#s(alt (* 2 d) (taylor inf d) (#s(alt (.f64 #s(literal 2 binary64) d) (patch (.f64 #s(literal 2 binary64) d) #<representation binary64>) () ())) ())
#s(alt (* 2 d) (taylor inf d) (#s(alt (.f64 #s(literal 2 binary64) d) (patch (.f64 #s(literal 2 binary64) d) #<representation binary64>) () ())) ())
#s(alt (* 2 d) (taylor inf d) (#s(alt (.f64 #s(literal 2 binary64) d) (patch (.f64 #s(literal 2 binary64) d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor inf d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor inf d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor inf d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor inf d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* (sqrt d) (sqrt -1)) (taylor inf d) (#s(alt (sqrt.f64 (neg.f64 d)) (patch (sqrt.f64 (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt d) (sqrt -1)) (taylor inf d) (#s(alt (sqrt.f64 (neg.f64 d)) (patch (sqrt.f64 (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt d) (sqrt -1)) (taylor inf d) (#s(alt (sqrt.f64 (neg.f64 d)) (patch (sqrt.f64 (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt d) (sqrt -1)) (taylor inf d) (#s(alt (sqrt.f64 (neg.f64 d)) (patch (sqrt.f64 (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (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)))) (patch (.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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d h))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d h))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d h))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d h))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (patch (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (patch (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) (patch (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (patch (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 d) (patch (sqrt.f64 d) #<representation binary64>) () ())) ())
#s(alt (* 2 d) (taylor -inf d) (#s(alt (.f64 #s(literal 2 binary64) d) (patch (.f64 #s(literal 2 binary64) d) #<representation binary64>) () ())) ())
#s(alt (* 2 d) (taylor -inf d) (#s(alt (.f64 #s(literal 2 binary64) d) (patch (.f64 #s(literal 2 binary64) d) #<representation binary64>) () ())) ())
#s(alt (* 2 d) (taylor -inf d) (#s(alt (.f64 #s(literal 2 binary64) d) (patch (.f64 #s(literal 2 binary64) d) #<representation binary64>) () ())) ())
#s(alt (* 2 d) (taylor -inf d) (#s(alt (.f64 #s(literal 2 binary64) d) (patch (.f64 #s(literal 2 binary64) d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor -inf d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor -inf d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor -inf d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 d) (taylor -inf d) (#s(alt (neg.f64 d) (patch (neg.f64 d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (sqrt -1))) (taylor -inf d) (#s(alt (sqrt.f64 (neg.f64 d)) (patch (sqrt.f64 (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (sqrt -1))) (taylor -inf d) (#s(alt (sqrt.f64 (neg.f64 d)) (patch (sqrt.f64 (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (sqrt -1))) (taylor -inf d) (#s(alt (sqrt.f64 (neg.f64 d)) (patch (sqrt.f64 (neg.f64 d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt d) (sqrt -1))) (taylor -inf d) (#s(alt (sqrt.f64 (neg.f64 d)) (patch (sqrt.f64 (neg.f64 d)) #<representation binary64>) () ())) ())

Calls

15 calls:

Time	Variable		Point	Expression
52.0ms	l	@	-inf	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt d) (sqrt l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (neg d)) (/ 1 (sqrt (neg h)))) (* 1/2 (* D 1/2)) (* D 1/2) (* (* 1/2 (* D 1/2)) (/ M d)) (* (* (/ 1/2 d) M) D) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (sqrt d) (sqrt l) (* 2 d) (* M D) (neg d) (neg l) (sqrt (neg d)) (sqrt (neg l)) (neg h) (sqrt (neg h)))
16.0ms	d	@	inf	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt d) (sqrt l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (neg d)) (/ 1 (sqrt (neg h)))) (* 1/2 (* D 1/2)) (* D 1/2) (* (* 1/2 (* D 1/2)) (/ M d)) (* (* (/ 1/2 d) M) D) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (sqrt d) (sqrt l) (* 2 d) (* M D) (neg d) (neg l) (sqrt (neg d)) (sqrt (neg l)) (neg h) (sqrt (neg h)))
10.0ms	D	@	0	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt d) (sqrt l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (neg d)) (/ 1 (sqrt (neg h)))) (* 1/2 (* D 1/2)) (* D 1/2) (* (* 1/2 (* D 1/2)) (/ M d)) (* (* (/ 1/2 d) M) D) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (sqrt d) (sqrt l) (* 2 d) (* M D) (neg d) (neg l) (sqrt (neg d)) (sqrt (neg l)) (neg h) (sqrt (neg h)))
7.0ms	h	@	-inf	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt d) (sqrt l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (neg d)) (/ 1 (sqrt (neg h)))) (* 1/2 (* D 1/2)) (* D 1/2) (* (* 1/2 (* D 1/2)) (/ M d)) (* (* (/ 1/2 d) M) D) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (sqrt d) (sqrt l) (* 2 d) (* M D) (neg d) (neg l) (sqrt (neg d)) (sqrt (neg l)) (neg h) (sqrt (neg h)))
7.0ms	d	@	-inf	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt d) (sqrt l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (/ (sqrt (neg d)) (sqrt (neg l)))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (neg d)) (/ 1 (sqrt (neg h)))) (* 1/2 (* D 1/2)) (* D 1/2) (* (* 1/2 (* D 1/2)) (/ M d)) (* (* (/ 1/2 d) M) D) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (sqrt d) (sqrt l) (* 2 d) (* M D) (neg d) (neg l) (sqrt (neg d)) (sqrt (neg l)) (neg h) (sqrt (neg h)))

simplify142.0ms (0.8%)

Memory

16.8MiB live, 207.2MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	178	8803
1	496	8551
2	1687	8455
3	4038	8416
0	8351	8209

Stop Event

1×	iter limit
1×	node limit

Counts

684 → 684

Calls

Call 1

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

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

rewrite268.0ms (1.5%)

Memory

-17.4MiB live, 223.5MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	59	220
0	101	202
1	275	190
2	1545	190
0	8642	185

Stop Event

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

Counts

25 → 1 141

Calls

Call 1

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

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

eval431.0ms (2.4%)

Memory: 36.6MiB live, 582.2MiB allocated
Compiler: Compiled 104 067 to 4 935 computations (95.3% saved)

prune168.0ms (0.9%)

Memory

-44.6MiB live, 344.5MiB allocated

Pruning

47 alts after pruning (47 fresh and 0 done)

	Pruned	Kept	Total
New	2 767	44	2 811
Fresh	15	3	18
Picked	5	0	5
Done	0	0	0
Total	2 787	47	2 834

Accuracy

94.1%

Counts

2 834 → 47

Alt Table

Click to see full alt table

Status	Accuracy	Program
	48.9%	(/.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l (.f64 (/.f64 d h) d))))
	27.6%	(/.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (*.f64 d (/.f64 d h)))) (sqrt.f64 l))
	18.2%	(/.f64 (.f64 (sqrt.f64 (.f64 d (/.f64 d h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))) (sqrt.f64 l))
▶	41.5%	(/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
	31.3%	(/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l (*.f64 (/.f64 d h) d))))
	27.6%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 l) (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (*.f64 d (/.f64 d h))))))
▶	53.5%	(.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d h) l) d)))
	16.0%	(.f64 (/.f64 (sqrt.f64 (.f64 d (/.f64 d l))) (sqrt.f64 h)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	31.2%	(.f64 (/.f64 (sqrt.f64 (.f64 d (/.f64 d h))) (sqrt.f64 l)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	28.7%	(.f64 (/.f64 (sqrt.f64 (.f64 d d)) (sqrt.f64 (.f64 h l))) #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	19.4%	(.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 (.f64 (/.f64 h d) l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	3.2%	(.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 (.f64 (neg.f64 h) (/.f64 l d)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	41.5%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 l d)) (sqrt.f64 (/.f64 d h)))) #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	34.3%	(.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (/.f64 h d) (/.f64 l d)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	68.7%	(.f64 (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	64.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 h l) #s(literal 1/2 binary64)) (.f64 (.f64 M #s(literal 1/2 binary64)) D)) (.f64 (.f64 d (/.f64 d D)) (/.f64 #s(literal 2 binary64) M)))))
▶	72.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 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	69.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 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 M (.f64 #s(literal 1/4 binary64) D)) h) d))))
	67.8%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (.f64 (/.f64 D d) (.f64 M #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 h l))))
	56.1%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) #s(approx (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (.f64 (.f64 (/.f64 #s(literal 1/8 binary64) (.f64 d d)) D) (.f64 (/.f64 (.f64 (.f64 M M) h) l) D)))))
	38.9%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64)))) l) h #s(literal 1 binary64)))
	26.9%	(.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)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) h) (/.f64 (/.f64 (/.f64 (.f64 D D) d) d) l)) (.f64 M M) #s(literal 1 binary64))))
	12.9%	(.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)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (.f64 (.f64 h (/.f64 (.f64 M M) l)) #s(literal -1/8 binary64)) (/.f64 (/.f64 (*.f64 D D) d) d))))
	23.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)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	41.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)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	41.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (neg.f64 d) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 l) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (neg.f64 d) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 l) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	10.1%	(.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))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	40.4%	(.f64 (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) #s(literal -1 binary64)) (/.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	23.3%	(.f64 (.f64 (/.f64 (sqrt.f64 (/.f64 d h)) #s(literal -1 binary64)) (/.f64 (neg.f64 (sqrt.f64 d)) (sqrt.f64 l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	40.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) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	23.1%	(.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	68.4%	(.f64 (.f64 (sqrt.f64 (/.f64 d l)) (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d h)))
	40.5%	(.f64 (.f64 (sqrt.f64 (/.f64 d l)) (sqrt.f64 (/.f64 d h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
▶	35.8%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	23.2%	(.f64 (.f64 (sqrt.f64 d) (.f64 (pow.f64 l #s(literal -1/2 binary64)) (sqrt.f64 (/.f64 d h)))) #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	18.2%	(.f64 (.f64 (neg.f64 (sqrt.f64 (.f64 d (/.f64 d h)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 l))) #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	57.7%	(.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	33.6%	(.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	41.2%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	41.9%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	43.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	16.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l)))
	19.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d))
	17.2%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
	12.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
▶	26.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 l h))) d))
	30.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))

Compiler

Compiled 2 282 to 1 880 computations (17.6% saved)

simplify125.0ms (0.7%)

Memory

25.8MiB live, 173.8MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	78	591
0	132	594
1	228	579
2	574	557
3	3050	535
4	7261	535
0	8308	525

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

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

localize277.0ms (1.5%)

Memory

9.2MiB live, 366.7MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	4.082484906692637	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
accuracy	4.192956736744083	(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))
accuracy	5.053773447071054	(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
accuracy	8.038013167472718	(sqrt.f64 (/.f64 d h))
accuracy	2.1717917724003546	(/.f64 (/.f64 d h) l)
accuracy	4.082484906692637	(.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d h) l) d)))
accuracy	5.029140776183876	(.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 D (/.f64 M d)) #s(literal 2 binary64))))
accuracy	10.00864624164663	(sqrt.f64 (*.f64 (/.f64 (/.f64 d h) l) d))
accuracy	0.9400617318588871	(.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h)))
accuracy	8.011927673436608	(sqrt.f64 (/.f64 l d))
accuracy	8.038013167472718	(sqrt.f64 (/.f64 d h))
accuracy	17.44498896676943	#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))
accuracy	0.10546875	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
accuracy	0.13216744546235162	(/.f64 #s(literal 1 binary64) (*.f64 l h))
accuracy	9.562225035876581	(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h)))
accuracy	16.912726263430343	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
accuracy	3.247730991098553	(/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))
accuracy	4.082484906692637	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
accuracy	8.038013167472718	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	8.33825494642615	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

114.0ms	122×	0	invalid
78.0ms	134×	0	valid

Compiler

Compiled 1 151 to 128 computations (88.9% saved)

Precisions

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

ival-pow: 58.0ms (38.8% of total)

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

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

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

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

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

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

exact: 1.0ms (0.7% of total)

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

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

series152.0ms (0.9%)

Memory

-12.5MiB live, 246.7MiB allocated

Counts

26 → 1 080

Calls

Call 1

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

Outputs
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (* d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ (pow h 3) (pow d 3)))))) h) (taylor 0 h) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 h) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor 0 h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor 0 h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor 0 h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor 0 h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 h) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 h) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 h) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 h) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d 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/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf h) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (sqrt (/ d (pow h 3))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ 1 (* (pow d 3) h))))))) (taylor inf h) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor inf h) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor inf h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor inf h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor inf h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor inf h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf h) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf h) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf h) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf h) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d 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/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 3))))) (taylor -inf h) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (sqrt (/ d (pow h 3))) (pow (sqrt -1) 2))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ 1 (* (pow d 3) h)))))))) (taylor -inf h) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (- (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))) (taylor -inf h) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor -inf h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor -inf h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor -inf h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor -inf h) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf h) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf h) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf h) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf h) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf h) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d 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/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 M) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 M) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf M) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor inf M) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor inf M) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf M) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow M 2)) (sqrt (/ d h))))) (taylor -inf M) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (/ (* (pow D 2) h) (* (pow d 2) l))) (/ 1 (pow M 2)))) (taylor -inf M) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 l) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow d 3))))) (* (sqrt (/ d h)) l)) l) (taylor 0 l) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ l (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor 0 l) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor 0 l) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor 0 l) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (/ h l) (taylor 0 l) (#s(alt (/.f64 h l) (patch (/.f64 h l) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 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 (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 l) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 l) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 l) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 l) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d 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 (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (* h l))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf l) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor inf l) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<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 (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 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 (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf l) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf l) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf l) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf l) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d 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 (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor -inf l) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor -inf l) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf l) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<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 (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (* h l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (.f64 l h)) (patch (/.f64 #s(literal 1 binary64) (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -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 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf l) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf l) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf l) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf l) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d 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/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 D) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ d h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3)))))) (taylor 0 D) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor inf D) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor inf D) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor inf D) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor -inf D) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) l) (sqrt (/ h (pow d 3))))) (* (/ 1 (pow D 2)) (sqrt (/ d h))))) (taylor -inf D) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (/ (* (pow M 2) h) (* (pow d 2) l))) (/ 1 (pow D 2)))) (taylor -inf D) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 3))))) (taylor 0 d) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (sqrt (/ (pow d 5) h)) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (* d h))))) (pow d 2)) (taylor 0 d) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) l)) (pow d 2)) (pow d 2)) (taylor 0 d) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 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 (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 d) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 d) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 d) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor 0 d) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d 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/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* d h))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) l) (sqrt (/ h (pow d 5))))))) (taylor inf d) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 (taylor inf d) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 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 (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf d) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf d) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf d) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor inf d) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d 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/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) (patch (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (patch #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) (patch (/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) l) (sqrt (/ h (pow d 5))))) (* (sqrt (/ 1 (* d h))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (patch (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (patch (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (patch (.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) (patch (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 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 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) (patch (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf d) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf d) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf d) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d h) l) #<representation binary64>) () ())) ())
#s(alt (/ d (* h l)) (taylor -inf d) (#s(alt (/.f64 (/.f64 d h) l) (patch (/.f64 (/.f64 d 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/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())

Calls

15 calls:

Time	Variable		Point	Expression
10.0ms	l	@	-inf	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h)) (+ (* (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (* (+ (* (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (sqrt (* (/ (/ d h) l) d))) (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) (/ h l) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ 1 (/ (/ d M) (* D 1/2))) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (/ 1 (* l h)) (sqrt (/ l d)) (sqrt (* (/ (/ d h) l) d)) (/ (/ d h) l) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)))
8.0ms	d	@	0	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h)) (+ (* (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (* (+ (* (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (sqrt (* (/ (/ d h) l) d))) (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) (/ h l) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ 1 (/ (/ d M) (* D 1/2))) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (/ 1 (* l h)) (sqrt (/ l d)) (sqrt (* (/ (/ d h) l) d)) (/ (/ d h) l) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)))
7.0ms	d	@	-inf	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h)) (+ (* (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (* (+ (* (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (sqrt (* (/ (/ d h) l) d))) (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) (/ h l) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ 1 (/ (/ d M) (* D 1/2))) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (/ 1 (* l h)) (sqrt (/ l d)) (sqrt (* (/ (/ d h) l) d)) (/ (/ d h) l) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)))
6.0ms	h	@	-inf	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h)) (+ (* (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (* (+ (* (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (sqrt (* (/ (/ d h) l) d))) (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) (/ h l) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ 1 (/ (/ d M) (* D 1/2))) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (/ 1 (* l h)) (sqrt (/ l d)) (sqrt (* (/ (/ d h) l) d)) (/ (/ d h) l) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)))
5.0ms	d	@	inf	((/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1)) (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ 1 (* l h))) d) (sqrt (/ 1 (* l h))) (* l h) (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h)) (+ (* (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (* (+ (* (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (sqrt (* (/ (/ d h) l) d))) (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) (/ h l) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ 1 (/ (/ d M) (* D 1/2))) l) (/ (* (* 1/2 (* D 1/2)) (/ M d)) (pow h -1))))) (/ 1 (* l h)) (sqrt (/ l d)) (sqrt (* (/ (/ d h) l) d)) (/ (/ d h) l) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)))

simplify410.0ms (2.3%)

Memory

-103.7MiB live, 337.4MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	252	16896
1	709	16449
2	2500	16357
3	6117	16315
0	8516	15922

Stop Event

1×	iter limit
1×	node limit

Counts

1 080 → 1 080

Calls

Call 1

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

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

rewrite209.0ms (1.2%)

Memory

9.5MiB live, 323.8MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	78	350
0	132	326
1	391	306
2	2742	287
0	8282	278

Stop Event

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

Counts

26 → 901

Calls

Call 1

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

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

eval375.0ms (2.1%)

Memory: -40.2MiB live, 623.9MiB allocated
Compiler: Compiled 57 802 to 3 271 computations (94.3% saved)

prune234.0ms (1.3%)

Memory

-8.0MiB live, 442.1MiB allocated

Pruning

60 alts after pruning (59 fresh and 1 done)

	Pruned	Kept	Total
New	2 031	45	2 076
Fresh	28	14	42
Picked	4	1	5
Done	0	0	0
Total	2 063	60	2 123

Accuracy

95.6%

Counts

2 123 → 60

Alt Table

Click to see full alt table

Status	Accuracy	Program
	39.7%	(/.f64 (.f64 (fma.f64 (.f64 (pow.f64 (*.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal -1/8 binary64)) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 h))) (sqrt.f64 l))
	25.5%	(/.f64 (.f64 (/.f64 d (sqrt.f64 h)) (-.f64 #s(literal 1 binary64) (pow.f64 (.f64 (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal -1/8 binary64)) (/.f64 h l)) #s(literal 2 binary64)))) (.f64 (sqrt.f64 l) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal -1/8 binary64)) (/.f64 h l)))))
	52.9%	(/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
	26.1%	(/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
	23.5%	(/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h)))) (sqrt.f64 (/.f64 l d)))
	23.6%	(/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (neg.f64 d))))
	9.7%	(/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #s(approx (sqrt (/ l d)) (neg.f64 (sqrt.f64 (/.f64 l d)))))
	31.3%	(/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l (*.f64 (/.f64 d h) d))))
	30.4%	(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (pow.f64 (/.f64 h d) #s(literal 3 binary64))) (sqrt.f64 (*.f64 d h))) h)) (sqrt.f64 (/.f64 l d)))
	13.6%	(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (.f64 d h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))) (sqrt.f64 (/.f64 l d)))
	41.5%	(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
	56.5%	(.f64 (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d h) l) d)))
	35.7%	(.f64 (fma.f64 (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal -1/8 binary64)) (/.f64 h l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (.f64 l h))))
	57.8%	(.f64 (fma.f64 (.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D))) h #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d h) l) d)))
	55.8%	(.f64 (fma.f64 (.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 #s(literal 1/4 binary64) D)) (.f64 (/.f64 M d) h) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d h) l) d)))
	38.0%	(.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #s(approx (sqrt (* (/ (/ d h) l) d)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))))
	54.8%	(.f64 (fma.f64 (.f64 (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 h l)) (.f64 (/.f64 M d) D)) (.f64 (/.f64 M d) D)) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d h) l) d)))
	28.7%	(.f64 (/.f64 (sqrt.f64 (.f64 d d)) (sqrt.f64 (.f64 h l))) #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	19.4%	(.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 (.f64 (/.f64 h d) l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	3.2%	(.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 (.f64 (neg.f64 h) (/.f64 l d)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
▶	35.2%	(.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	68.4%	(.f64 (.f64 (fma.f64 (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal -1/8 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	68.7%	(.f64 (.f64 (fma.f64 (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal -1/8 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
▶	72.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 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) h))))
	26.9%	(.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)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) h) (/.f64 (/.f64 (/.f64 (.f64 D D) d) d) l)) (.f64 M M) #s(literal 1 binary64))))
	41.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (neg.f64 d) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 l) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (neg.f64 d) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 l) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	10.1%	(.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))))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	40.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) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	23.1%	(.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 h)))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
▶	39.6%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)))
	35.6%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 M (.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) (.f64 (.f64 (/.f64 M d) D) #s(literal 1/2 binary64))) (.f64 (/.f64 #s(literal -1 binary64) h) l))))
	40.0%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 M (.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal -1 binary64) h) (/.f64 l (.f64 (.f64 (/.f64 M d) D) #s(literal 1/2 binary64)))))))
	39.1%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D))) (neg.f64 l))))
	35.9%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 l h)))))
	39.6%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (.f64 (/.f64 M d) D) #s(literal 1/2 binary64)) (/.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) l))))
	15.2%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (*.f64 D D) l))))
	18.2%	(.f64 (.f64 (neg.f64 (sqrt.f64 (.f64 d (/.f64 d h)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 l))) #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
▶	41.4%	(.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))))
	54.5%	(.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 d l) h) 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.6%	(.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	42.5%	(.f64 #s(approx (+ ( (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d h) l) d)))
	21.5%	(.f64 #s(approx (+ ( (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l))) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)))
	41.2%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	41.9%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	43.6%	#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	19.0%	#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d))
	17.2%	#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))))))
	30.5%	#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	24.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l)))
	16.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
	21.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
▶	26.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
	3.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (*.f64 (/.f64 (sqrt.f64 (neg.f64 (pow.f64 l #s(literal -1 binary64)))) (sqrt.f64 (neg.f64 h))) d))
	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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
	12.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
	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 (sqrt.f64 (pow.f64 (sqrt.f64 (.f64 l h)) #s(literal -2 binary64))) d))
	40.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 l)) (sqrt.f64 (/.f64 d h))))
✓	26.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 l h))) d))
	25.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d))
	33.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))

Compiler

Compiled 2 709 to 2 239 computations (17.3% saved)

simplify119.0ms (0.7%)

Memory

0.1MiB live, 113.3MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	73	550
0	123	545
1	227	545
2	669	533
3	4074	530
0	8437	524

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

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

localize231.0ms (1.3%)

Memory

8.4MiB live, 328.4MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	4.082484906692637	(.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
accuracy	4.192956736744083	(/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d))
accuracy	5.053773447071054	(.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))
accuracy	9.664792290691283	(sqrt.f64 (*.f64 l h))
accuracy	2.9902233261800713	(.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D))
accuracy	3.471218362021066	(*.f64 (/.f64 M d) h)
accuracy	4.082484906692637	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)))
accuracy	8.038013167472718	(sqrt.f64 (/.f64 d h))
accuracy	1.477651631665471	(/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))
accuracy	8.011927673436608	(sqrt.f64 (/.f64 l d))
accuracy	8.038013167472718	(sqrt.f64 (/.f64 d h))
accuracy	17.44498896676943	#s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64))
accuracy	0	(*.f64 l h)
accuracy	0.09375	(/.f64 d (sqrt.f64 (*.f64 l h)))
accuracy	9.664792290691283	(sqrt.f64 (*.f64 l h))
accuracy	16.912726263430343	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
accuracy	3.212574741098553	(.f64 (.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) h)
accuracy	4.082484906692637	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) h))))
accuracy	8.038013167472718	(pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
accuracy	8.33825494642615	(pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))

Samples

80.0ms	134×	0	valid
59.0ms	122×	0	invalid

Compiler

Compiled 1 071 to 118 computations (89% saved)

Precisions

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

ival-mult: 34.0ms (36.3% of total)

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

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

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

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

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

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

exact: 1.0ms (1.1% of total)

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

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

series138.0ms (0.8%)

Memory

1.7MiB live, 207.0MiB allocated

Counts

24 → 984

Calls

Call 1

Inputs
#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (patch (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())
#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())
#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())
#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())
#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())
#s(alt (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())
#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 l d)) (patch (sqrt.f64 (/.f64 l d)) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 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 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor 0 h) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor 0 h) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor 0 h) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor 0 h) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 h) (#s(alt (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h) (taylor 0 h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor 0 h) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor 0 h) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor 0 h) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor 0 h) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 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 (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor inf h) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor inf h) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor inf h) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor inf h) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor inf h) (#s(alt (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l)))))) (taylor inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))))) (taylor inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor inf h) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor inf h) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor inf h) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor inf h) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf h) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf h) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d h)) (pow (sqrt -1) 2)) (taylor -inf h) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor -inf h) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor -inf h) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor -inf h) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor -inf h) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor -inf h) (#s(alt (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf h) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3))))))))) (taylor -inf h) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h))) (taylor -inf h) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor -inf h) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor -inf h) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor -inf h) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor -inf h) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf h) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/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/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 M) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 M) (#s(alt (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation 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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation 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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation 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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor 0 M) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor 0 M) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor 0 M) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor 0 M) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf M) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor inf M) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor inf M) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor inf M) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor inf M) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l))))) (taylor -inf M) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf M) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor -inf M) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor -inf M) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor -inf M) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor -inf M) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf M) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf M) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor 0 l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor 0 l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2)) (taylor 0 l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l) (taylor 0 l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 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 (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (* h l)) (taylor inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf l) (#s(alt (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf l) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ d l)) (pow (sqrt -1) 2)) (taylor -inf l) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2))) (taylor -inf l) (#s(alt (sqrt.f64 (.f64 l h)) (patch (sqrt.f64 (.f64 l h)) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* h l) (taylor -inf l) (#s(alt (.f64 l h) (patch (.f64 l h) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor -inf l) (#s(alt (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf l) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf l) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 (* 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 D) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 D) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 D) (#s(alt (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation 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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation 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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation 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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l))))) (taylor 0 D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor 0 D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf D) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf D) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l))))) (taylor -inf D) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l)))))) (taylor -inf D) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf D) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor 0 d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor 0 d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor 0 d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor 0 d) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor 0 d) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor 0 d) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor 0 d) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (taylor 0 d) (#s(alt (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor 0 d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2)) (taylor 0 d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d) (taylor 0 d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 (/ (* M h) d) (taylor 0 d) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor 0 d) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor 0 d) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor 0 d) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor 0 d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor inf d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d h)) (taylor inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor inf d) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor inf d) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor inf d) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor inf d) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ d l)) (taylor inf d) (#s(alt (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))) (taylor inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 (/ (* M h) d) (taylor inf d) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor inf d) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor inf d) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor inf d) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (patch (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) (patch (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (.f64 l h)))) (patch #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (/.f64 d (sqrt.f64 (.f64 l h))) (patch (/.f64 d (sqrt.f64 (.f64 l h))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2))) (taylor -inf d) (#s(alt (sqrt.f64 (/.f64 d h)) (patch (sqrt.f64 (/.f64 d h)) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor -inf d) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor -inf d) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor -inf d) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (/ d h) (taylor -inf d) (#s(alt (/.f64 d h) (patch (/.f64 d h) #<representation binary64>) () ())) ())
#s(alt (* -1 (sqrt (/ d l))) (taylor -inf d) (#s(alt (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* 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 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) (patch (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (patch (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) (patch (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))) #<representation binary64>) () ())) ())
#s(alt (* d (sqrt (/ 1 (* h l)))) (taylor -inf d) (#s(alt (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<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 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (patch (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2))))) (taylor -inf d) (#s(alt (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) (patch (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h)))) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) (patch (.f64 (.f64 (/.f64 M d) (.f64 #s(literal 1/4 binary64) D)) h) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))) (taylor -inf d) (#s(alt #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (patch #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #<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 (/ (* M h) d) (taylor -inf d) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor -inf d) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor -inf d) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (/ (* M h) d) (taylor -inf d) (#s(alt (.f64 (/.f64 M d) h) (patch (.f64 (/.f64 M d) h) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/4 (/ (* D (* M h)) d)) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) (patch (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))) (taylor -inf d) (#s(alt (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) (patch (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (* D M) d)) (taylor -inf d) (#s(alt (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) (patch (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #<representation binary64>) () ())) ())

Calls

15 calls:

Time	Variable		Point	Expression
22.0ms	d	@	-inf	((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (/ 1 (/ (/ d M) (* D 1/2))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (* (sqrt (/ d h)) (/ (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d)))) (sqrt (/ d h)) (/ d h) (/ (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d))) (* (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (+ (* (/ (* (/ M d) (* -1/2 D)) l) (* (* (/ M d) h) (* 1/4 D))) 1)) (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (/ d (sqrt (* l h))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ 1 (/ (/ d M) (* D 1/2))) l) (* (* (/ M d) (* 1/4 D)) h)))) (* (* (/ M d) (* 1/4 D)) h) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d)) (* (/ M d) h) (* (* (/ M d) h) (* 1/4 D)) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)))
7.0ms	h	@	-inf	((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (/ 1 (/ (/ d M) (* D 1/2))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (* (sqrt (/ d h)) (/ (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d)))) (sqrt (/ d h)) (/ d h) (/ (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d))) (* (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (+ (* (/ (* (/ M d) (* -1/2 D)) l) (* (* (/ M d) h) (* 1/4 D))) 1)) (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (/ d (sqrt (* l h))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ 1 (/ (/ d M) (* D 1/2))) l) (* (* (/ M d) (* 1/4 D)) h)))) (* (* (/ M d) (* 1/4 D)) h) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d)) (* (/ M d) h) (* (* (/ M d) h) (* 1/4 D)) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)))
6.0ms	M	@	0	((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (/ 1 (/ (/ d M) (* D 1/2))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (* (sqrt (/ d h)) (/ (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d)))) (sqrt (/ d h)) (/ d h) (/ (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d))) (* (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (+ (* (/ (* (/ M d) (* -1/2 D)) l) (* (* (/ M d) h) (* 1/4 D))) 1)) (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (/ d (sqrt (* l h))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ 1 (/ (/ d M) (* D 1/2))) l) (* (* (/ M d) (* 1/4 D)) h)))) (* (* (/ M d) (* 1/4 D)) h) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d)) (* (/ M d) h) (* (* (/ M d) h) (* 1/4 D)) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)))
5.0ms	d	@	0	((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (/ 1 (/ (/ d M) (* D 1/2))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (* (sqrt (/ d h)) (/ (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d)))) (sqrt (/ d h)) (/ d h) (/ (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d))) (* (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (+ (* (/ (* (/ M d) (* -1/2 D)) l) (* (* (/ M d) h) (* 1/4 D))) 1)) (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (/ d (sqrt (* l h))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ 1 (/ (/ d M) (* D 1/2))) l) (* (* (/ M d) (* 1/4 D)) h)))) (* (* (/ M d) (* 1/4 D)) h) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d)) (* (/ M d) h) (* (* (/ M d) h) (* 1/4 D)) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)))
5.0ms	l	@	-inf	((pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2)) (/ 1 2) (/ 1 (/ (/ d M) (* D 1/2))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/ d (sqrt (* l h))) (sqrt (* l h)) (* l h) (* (sqrt (/ d h)) (/ (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d)))) (sqrt (/ d h)) (/ d h) (/ (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d))) (* (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (+ (* (/ (* (/ M d) (* -1/2 D)) l) (* (* (/ M d) h) (* 1/4 D))) 1)) (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (* (/ d (sqrt (* l h))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (/ (/ 1 (/ (/ d M) (* D 1/2))) l) (* (* (/ M d) (* 1/4 D)) h)))) (* (* (/ M d) (* 1/4 D)) h) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d)) (* (/ M d) h) (* (* (/ M d) h) (* 1/4 D)) (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)) (/ (* M D) (* 2 d)))

simplify189.0ms (1.1%)

Memory

24.7MiB live, 219.5MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	232	15058
1	672	14800
2	2404	14673
3	5440	14631
0	8155	14292

Stop Event

1×	iter limit
1×	node limit

Counts

984 → 984

Calls

Call 1

Inputs
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* h l)
(* h l)
(* h l)
(* h l)
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(/ d h)
(/ d h)
(/ d h)
(/ d h)
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* d (sqrt (/ 1 (* h l))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) 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))))
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* h l)
(* h l)
(* h l)
(* h l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(/ d h)
(/ d h)
(/ d h)
(/ d h)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 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)))))
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* h l)
(* h l)
(* h l)
(* h l)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(/ d h)
(/ d h)
(/ d h)
(/ d 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)))))))))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) 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 (* 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) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* -1/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)))
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
1
(+ 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))))
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/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)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (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)))))
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/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)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (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)))))
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* h l)
(* h l)
(* h l)
(* h l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(sqrt (* h l))
(* h l)
(* h l)
(* h l)
(* h l)
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(* h l)
(* h l)
(* h l)
(* h l)
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* -1 (* (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)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow 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))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(sqrt (/ d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* d (sqrt (/ 1 (* h l))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/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)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (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/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/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)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* (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/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* 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))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(/ d h)
(/ d h)
(/ d h)
(/ d h)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(/ (- (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))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(sqrt (/ d l))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(sqrt (/ d h))
(/ d h)
(/ d h)
(/ d h)
(/ d h)
(sqrt (/ d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
(* d (sqrt (/ 1 (* h l))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (sqrt (/ 1 (* h l))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) 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))))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(sqrt (/ l d))
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* 1/2 (/ (* D M) d))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* 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/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 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(/ d h)
(/ d h)
(/ d h)
(/ d h)
(* -1 (sqrt (/ d l)))
(* -1 (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))))
(* -1 (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))))
(* -1 (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
1
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(* d (sqrt (/ 1 (* h l))))
(* -1 (* 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 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) 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))))
(* (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))
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(/ (* M h) d)
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/4 (/ (* D (* M h)) d))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(* 1/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))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ (pow h 3) (pow l 3))))) (* d (sqrt (/ h l)))) h)
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h)
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* h (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (sqrt (/ d l)) (/ 1 h))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* h (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))) (* d (sqrt (/ 1 (* (pow h 3) l))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (- (/ 1 h) (* 1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(* (sqrt (/ d h)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d h)))
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1 (* h (+ (* -1 (* (sqrt (/ d l)) (/ 1 h))) (* 1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* -1 (* h (+ (* -1 (* d (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)) h)
(* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (*.f64 D D) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* -1 (* h (+ (* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* (pow h 3) l))))) (* 1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ 1 (* h (pow l 3)))))))))
(.f64 (neg.f64 h) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 l #s(literal 3 binary64)) h))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 h #s(literal 3 binary64)) l))) d)))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* h (+ (* -1/8 (/ (* (pow D 2) (pow M 2)) (* (pow d 2) l))) (/ 1 h)))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) h) l) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) h) l) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) h) l) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) h) l) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) h) l) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) h) l) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow M 2) (+ (* -1/8 (* (* (pow D 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow M 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (.f64 (*.f64 D D) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) h) l) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) h) l) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) h) l) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow M 2) (+ (* -1/8 (* (/ (pow D 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow M 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) h) l) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) h) l) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(* (pow M 2) (- (/ 1 (pow M 2)) (* 1/8 (/ (* (pow D 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) h) l) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(/ (+ (sqrt (* d (pow l 3))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ l (pow d 3)))))) (pow l 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 l (pow.f64 d #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (.f64 (pow.f64 l #s(literal 3 binary64)) d))) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(/ (+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (* h l)))) (* d (sqrt (/ (pow l 3) h)))) (pow l 2))
(/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (.f64 l h)) (.f64 (sqrt.f64 (/.f64 (pow.f64 l #s(literal 3 binary64)) h)) d)) (*.f64 l l))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(/ (- l (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (pow d 2)))) l)
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 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))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(sqrt (* h l))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 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))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (sqrt (/ d l)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* -1 (* (sqrt (* h l)) (pow (sqrt -1) 2)))
(sqrt.f64 (*.f64 l h))
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* h l)
(*.f64 l h)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) d) (sqrt (/ h (pow l 3))))) (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (.f64 (.f64 (neg.f64 M) M) (/.f64 (.f64 D D) d)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -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))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(+ (sqrt (/ d l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(+ (* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3))))) (* d (sqrt (/ 1 (* h l)))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* (pow D 2) (+ (* -1/8 (* (* (pow M 2) h) (sqrt (/ 1 (* (pow d 3) (pow l 3)))))) (* (/ 1 (pow D 2)) (sqrt (/ d l)))))
(fma.f64 (.f64 (.f64 D D) (.f64 (.f64 (*.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))) (sqrt.f64 (/.f64 d l)))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* (pow D 2) (+ (* -1/8 (* (/ (pow M 2) d) (sqrt (/ h (pow l 3))))) (* (/ d (pow D 2)) (sqrt (/ 1 (* h l))))))
(fma.f64 (.f64 (.f64 M M) (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (pow D 2) (- (/ 1 (pow D 2)) (* 1/8 (/ (* (pow M 2) h) (* (pow d 2) l)))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 3) (pow l 3))))))
(.f64 (.f64 (.f64 D D) (.f64 (.f64 (.f64 M M) h) #s(literal -1/8 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 3 binary64)))))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (.f64 d d))
(/ (+ (sqrt (/ (pow d 5) l)) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ d (pow l 3)))))) (pow d 2))
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 d (pow.f64 l #s(literal 3 binary64)))) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) l))) (.f64 d d))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* -1/8 (* (/ (* (pow D 2) (pow M 2)) d) (sqrt (/ h (pow l 3)))))
(.f64 (.f64 (.f64 M M) #s(literal -1/8 binary64)) (.f64 (/.f64 (*.f64 D D) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(/ (+ (* -1/8 (* (* (pow D 2) (pow M 2)) (sqrt (/ h (pow l 3))))) (* (pow d 2) (sqrt (/ 1 (* h l))))) d)
(/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d)
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(/ (- (pow d 2) (* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) l))) (pow d 2))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 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))
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(sqrt (/ d h))
(sqrt.f64 (/.f64 d h))
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(sqrt (/ d l))
(sqrt.f64 (/.f64 d l))
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))) d)
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))) d)
(* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3))))))))
(.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3)))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 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))
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* -1 (* (sqrt (/ d l)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d l))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (sqrt (/ 1 (* h l)))))
(.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* d (+ (sqrt (/ 1 (* h l))) (* -1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(* -1 (* (sqrt (/ d h)) (pow (sqrt -1) 2)))
(sqrt.f64 (/.f64 d h))
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(/ d h)
(/.f64 d h)
(* -1 (sqrt (/ d l)))
(neg.f64 (sqrt.f64 (/.f64 d l)))
(* -1 (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))))
(* -1 (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))))
(* -1 (* d (+ (sqrt (/ 1 (* d l))) (* -1/8 (* (* (pow D 2) (* (pow M 2) h)) (sqrt (/ 1 (* (pow d 5) (pow l 3)))))))))
(.f64 (neg.f64 d) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (.f64 M M) h)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 l #s(literal 3 binary64))) (pow.f64 d #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l d)))))
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* d (sqrt (/ 1 (* h l))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* -1 (* d (+ (* -1 (sqrt (/ 1 (* h l)))) (* 1/8 (* (/ (* (pow D 2) (pow M 2)) (pow d 2)) (sqrt (/ h (pow l 3))))))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* -1 (* (* d (pow (sqrt -1) 2)) (sqrt (/ 1 (* h l)))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* -1 (* d (+ (* -1/8 (* (/ (* (pow D 2) (* (pow M 2) (pow (sqrt -1) 2))) (pow d 2)) (sqrt (/ h (pow l 3))))) (* (sqrt (/ 1 (* h l))) (pow (sqrt -1) 2)))))
(.f64 (fma.f64 (.f64 (/.f64 (.f64 D D) d) #s(literal -1/8 binary64)) (.f64 (/.f64 (.f64 M M) d) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))) d)
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(+ 1 (* -1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l))))
(fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))
(* (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)))
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(/ (* M h) d)
(/.f64 (*.f64 M h) d)
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/4 (/ (* D (* M h)) d))
(.f64 (/.f64 (.f64 (*.f64 M h) D) d) #s(literal 1/4 binary64))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/8 (/ (* (pow D 2) (* (pow M 2) h)) (* (pow d 2) l)))
(.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) l) (.f64 (/.f64 (/.f64 (*.f64 M M) d) d) h))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))
(* 1/2 (/ (* D M) d))
(.f64 (/.f64 (.f64 M D) d) #s(literal 1/2 binary64))

rewrite305.0ms (1.7%)

Memory

-15.5MiB live, 335.8MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	73	314
0	123	298
1	369	294
2	2641	286
0	8371	280

Stop Event

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

Counts

24 → 1 499

Calls

Call 1

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

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

eval457.0ms (2.6%)

Memory: 95.3MiB live, 902.1MiB allocated
Compiler: Compiled 89 526 to 4 696 computations (94.8% saved)

prune412.0ms (2.3%)

Memory

-33.1MiB live, 555.0MiB allocated

Pruning

60 alts after pruning (58 fresh and 2 done)

	Pruned	Kept	Total
New	2 796	30	2 826
Fresh	26	28	54
Picked	4	1	5
Done	0	1	1
Total	2 826	60	2 886

Accuracy

97.4%

Counts

2 886 → 60

Alt Table

Click to see full alt table

Status	Accuracy	Program
	35.5%	(fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) D) l) (/.f64 M d)) (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 d (sqrt.f64 (.f64 l h)))) (/.f64 d (sqrt.f64 (.f64 l h))))
	35.1%	(fma.f64 (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (.f64 (.f64 (/.f64 M d) h) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) D) l) (/.f64 M d)))) (.f64 #s(literal 1/4 binary64) D) (/.f64 d (sqrt.f64 (.f64 l h))))
	42.3%	(/.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)) d) (sqrt.f64 l)) (sqrt.f64 h))
	26.4%	(/.f64 (.f64 (fma.f64 (pow.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) (.f64 (/.f64 (.f64 #s(literal -1/2 binary64) D) l) (/.f64 M d))) D) #s(literal 2 binary64)) #s(literal 1/16 binary64) #s(literal -1 binary64)) (/.f64 d (sqrt.f64 h))) (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal -1 binary64)) (sqrt.f64 l)))
	42.1%	(/.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 h))) (sqrt.f64 l))
	36.1%	(/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)) d) (sqrt.f64 (*.f64 l h)))
	38.8%	(/.f64 (.f64 (sqrt.f64 d) (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (*.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l)))) (sqrt.f64 h))
	23.5%	(/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h)))) (sqrt.f64 (/.f64 l d)))
	23.6%	(/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (/.f64 (sqrt.f64 (neg.f64 l)) (sqrt.f64 (neg.f64 d))))
	9.7%	(/.f64 (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) #s(approx (sqrt (/ l d)) (neg.f64 (sqrt.f64 (/.f64 l d)))))
	30.4%	(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (pow.f64 (/.f64 h d) #s(literal 3 binary64))) (sqrt.f64 (*.f64 d h))) h)) (sqrt.f64 (/.f64 l d)))
	13.6%	(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) l)) (sqrt.f64 (.f64 d h)) (sqrt.f64 (/.f64 (pow.f64 d #s(literal 5 binary64)) h))) (.f64 d d))) (sqrt.f64 (/.f64 l d)))
	41.5%	(/.f64 #s(approx (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 l d)))
	55.8%	(.f64 (fma.f64 (.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 #s(literal 1/4 binary64) D)) (.f64 (/.f64 M d) h) #s(literal 1 binary64)) (sqrt.f64 (*.f64 (/.f64 (/.f64 d h) l) d)))
	38.0%	(.f64 (fma.f64 (.f64 (/.f64 h l) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) #s(literal -1/2 binary64) #s(literal 1 binary64)) #s(approx (sqrt (* (/ (/ d h) l) d)) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))))
	38.7%	(.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 (*.f64 l h))))
	27.4%	(.f64 (/.f64 (sqrt.f64 (.f64 (neg.f64 d) (/.f64 d l))) (sqrt.f64 (neg.f64 h))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)))
	28.7%	(.f64 (/.f64 (sqrt.f64 (.f64 d d)) (sqrt.f64 (.f64 h l))) #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	23.4%	(.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 h))) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 (/.f64 l d))))
	39.6%	(.f64 (/.f64 d (.f64 (sqrt.f64 l) (sqrt.f64 h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	40.8%	(.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)))
	35.2%	(.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))
	28.1%	(.f64 (/.f64 d (sqrt.f64 (.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) h) l) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64))))
	17.4%	(.f64 (/.f64 d (sqrt.f64 (.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (*.f64 D D) l))))
	40.8%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 l h)) d)) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)))
	68.7%	(.f64 (.f64 (fma.f64 (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal -1/8 binary64)) (/.f64 h l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	69.0%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (*.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d l))) (sqrt.f64 (/.f64 d h)))
	69.3%	(.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (*.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l)))
	26.9%	(.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)))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) h) (/.f64 (/.f64 (/.f64 (.f64 D D) d) d) l)) (.f64 M M) #s(literal 1 binary64))))
	41.0%	(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (neg.f64 d) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 l) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (neg.f64 d) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 l) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	72.5%	(.f64 (.f64 (pow.f64 (/.f64 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) (/.f64 (/.f64 d M) (.f64 D #s(literal 1/2 binary64)))) l) (.f64 (.f64 (/.f64 M d) (*.f64 #s(literal 1/4 binary64) D)) h))))
	38.1%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (/.f64 (.f64 (.f64 M h) (*.f64 #s(literal 1/4 binary64) D)) d) #s(literal 1 binary64)))
	40.0%	(.f64 (.f64 (sqrt.f64 (/.f64 d h)) (/.f64 (sqrt.f64 d) (sqrt.f64 l))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (.f64 M (.f64 #s(literal 1/4 binary64) D)) (neg.f64 d)) #s(literal 1 binary64)) (.f64 (/.f64 #s(literal -1 binary64) h) (/.f64 l (.f64 (.f64 (/.f64 M d) D) #s(literal 1/2 binary64)))))))
	18.2%	(.f64 (.f64 (neg.f64 (sqrt.f64 (.f64 d (/.f64 d h)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 l))) #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	9.7%	(.f64 (sqrt.f64 (/.f64 d h)) (/.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) #s(approx (sqrt (/ l d)) (neg.f64 (sqrt.f64 (/.f64 l d))))))
	23.2%	(.f64 (sqrt.f64 (/.f64 d h)) (.f64 (/.f64 #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)) (sqrt.f64 l)) (sqrt.f64 d)))
	40.5%	(.f64 (sqrt.f64 (/.f64 d h)) #s(approx (/ (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d))) (sqrt.f64 (/.f64 d l))))
	10.1%	(.f64 (sqrt.f64 (/.f64 d h)) #s(approx (/ (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ l d))) (neg.f64 (sqrt.f64 (/.f64 d l)))))
	33.6%	(.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) #s(literal 1 binary64)))
	58.0%	(.f64 (sqrt.f64 (.f64 (/.f64 d l) (/.f64 d h))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)))
	42.5%	(.f64 #s(approx (+ ( (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d h) l) d)))
	21.5%	(.f64 #s(approx (+ ( (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l))) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)))
	41.9%	(.f64 #s(approx ( (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64))))))
	41.1%	(.f64 #s(approx ( (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)))
	43.6%	#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 M M)) (/.f64 (.f64 D D) d)) (sqrt.f64 (pow.f64 (/.f64 h l) #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 h l)) d)) h))
	19.0%	#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (/.f64 (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 D D)) (.f64 (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64)))) (.f64 M M)) (.f64 (.f64 d d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 l h))))) d))
	30.5%	#s(approx (/ (* (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (sqrt (/ d h))) (sqrt (/ l d))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h)))))
	24.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 l)) (sqrt.f64 h)))
	24.3%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (/.f64 d (sqrt.f64 h)) (sqrt.f64 l)))
	16.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (*.f64 (/.f64 d l) d)) (sqrt.f64 h)))
	21.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 (sqrt.f64 (.f64 #s(literal 1 binary64) (neg.f64 d))) (sqrt.f64 (.f64 (/.f64 h d) (neg.f64 l)))))
	25.8%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))
✓	26.1%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))
	26.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 l h)) d)))
	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 (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 l h))) d))
	12.5%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 D D)) (/.f64 (*.f64 M M) d)) (sqrt.f64 (/.f64 h (pow.f64 l #s(literal 3 binary64))))))
✓	26.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 l h))) d))
	25.0%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (exp.f64 (.f64 (log.f64 (*.f64 l h)) #s(literal -1/2 binary64))) d))
	33.6%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 (/.f64 d l) h) d)))
	34.4%	#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (sqrt.f64 (*.f64 (/.f64 d l) (/.f64 d h))))

Compiler

Compiled 4 949 to 1 675 computations (66.2% saved)

regimes354.0ms (2%)

Memory

-4.4MiB live, 547.2MiB allocated

Counts

143 → 4

Calls

Call 1

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

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

Calls

7 calls:

61.0ms	M
61.0ms	d
58.0ms	l
48.0ms	h
40.0ms	(*.f64 M D)

Results

Accuracy	Segments	Branch
85.1%	3	`d`
87.6%	4	`h`
84.9%	3	`l`
72.6%	1	`M`
72.6%	1	`D`
79.5%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
72.6%	1	`(*.f64 M D)`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes111.0ms (0.6%)

Memory

-10.6MiB live, 70.2MiB allocated

Counts

142 → 4

Calls

Call 1

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

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

Calls

1 calls:

55.0ms

Results

Accuracy	Segments	Branch
87.3%	4	`h`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes155.0ms (0.9%)

Memory

-4.4MiB live, 156.4MiB allocated

Counts

132 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

3 calls:

42.0ms	d
41.0ms	l
37.0ms	h

Results

Accuracy	Segments	Branch
83.8%	3	`l`
83.9%	3	`d`
84.9%	3	`h`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes49.0ms (0.3%)

Memory

32.8MiB live, 69.0MiB allocated

Counts

127 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

42.0ms

Results

Accuracy	Segments	Branch
84.9%	3	`h`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes106.0ms (0.6%)

Memory

-30.9MiB live, 89.0MiB allocated

Counts

115 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

53.0ms

Results

Accuracy	Segments	Branch
84.7%	3	`h`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes89.0ms (0.5%)

Memory

6.1MiB live, 83.9MiB allocated

Counts

100 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

47.0ms	h
26.0ms	d

Results

Accuracy	Segments	Branch
83.1%	3	`d`
83.9%	3	`h`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes64.0ms (0.4%)

Memory

16.4MiB live, 71.0MiB allocated

Counts

85 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

36.0ms	l
22.0ms	h

Results

Accuracy	Segments	Branch
81.2%	2	`l`
83.7%	3	`h`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes67.0ms (0.4%)

Memory

-30.8MiB live, 45.4MiB allocated

Counts

51 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

28.0ms	h
14.0ms	d

Results

Accuracy	Segments	Branch
81.2%	2	`d`
81.2%	2	`h`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes73.0ms (0.4%)

Memory

8.6MiB live, 46.6MiB allocated

Counts

50 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

4 calls:

28.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))))
14.0ms	h
14.0ms	l
14.0ms	d

Results

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

Compiler

Compiled 38 to 37 computations (2.6% saved)

regimes15.0ms (0.1%)

Memory

13.1MiB live, 13.1MiB allocated

Counts

45 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

12.0ms

Results

Accuracy	Segments	Branch
79.3%	3	`l`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes146.0ms (0.8%)

Memory

-18.2MiB live, 64.2MiB allocated

Counts

43 → 3

Calls

Call 1

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

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

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

Calls

7 calls:

43.0ms	h
39.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))))
12.0ms	d
12.0ms	M
12.0ms	l

Results

Accuracy	Segments	Branch
63.7%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
55.9%	2	`M`
50.9%	2	`D`
53.4%	2	`(*.f64 M D)`
66.0%	3	`d`
62.6%	2	`h`
64.2%	3	`l`

Compiler

Compiled 43 to 53 computations (-23.3% saved)

regimes26.0ms (0.1%)

Memory

20.8MiB live, 20.8MiB allocated

Counts

42 → 2

Calls

Call 1

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

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

Calls

2 calls:

12.0ms	d
12.0ms	h

Results

Accuracy	Segments	Branch
62.6%	2	`h`
62.3%	2	`d`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes101.0ms (0.6%)

Memory

6.2MiB live, 44.8MiB allocated

Counts

39 → 3

Calls

Call 1

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

Outputs

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

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

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

Results

Accuracy	Segments	Branch
49.7%	2	`M`
55.7%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
55.5%	3	`d`
56.3%	3	`l`
56.0%	4	`h`

Compiler

Compiled 39 to 42 computations (-7.7% saved)

regimes55.0ms (0.3%)

Memory

7.3MiB live, 46.0MiB allocated

Counts

38 → 3

Calls

Call 1

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

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 40 to 38 computations (5% saved)

regimes138.0ms (0.8%)

Memory

-28.3MiB live, 49.9MiB allocated

Counts

37 → 2

Calls

Call 1

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

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

Calls

5 calls:

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

Results

Accuracy	Segments	Branch
50.6%	2	`l`
43.4%	2	`D`
48.8%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
50.2%	2	`h`
50.5%	2	`d`

Compiler

Compiled 39 to 42 computations (-7.7% saved)

regimes15.0ms (0.1%)

Memory

19.8MiB live, 19.8MiB allocated

Counts

5 → 2

Calls

Call 1

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

Outputs

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
34.8%	3	`(.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l))))`
34.3%	3	`M`
32.9%	2	`(*.f64 M D)`
45.4%	2	`h`
45.8%	2	`d`
46.5%	2	`l`

Compiler

Compiled 42 to 48 computations (-14.3% saved)

regimes41.0ms (0.2%)

Memory

-15.2MiB live, 23.4MiB allocated

Accuracy

Total -0.0b remaining (-0.1%)

Threshold costs -0b (-0.1%)

Counts

3 → 1

Calls

Call 1

Inputs

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

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

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

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 43 to 53 computations (-23.3% saved)

bsearch312.0ms (1.7%)

Memory

-45.4MiB live, 235.9MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
83.0ms	1.0371979355890709e-70	9.884556088971023e-66
101.0ms	-1.0462031542985186e-306	4.966632215515019e-307
77.0ms	-1.024380890092072e+80	-1.4626025381921215e+77

Samples

149.0ms	382×	0	invalid
82.0ms	400×	0	valid

Compiler

Compiled 1 953 to 1 458 computations (25.3% saved)

Precisions

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

ival-mult: 118.0ms (58.4% of total)

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

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

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

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

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

exact: 1.0ms (0.5% of total)

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

bsearch97.0ms (0.5%)

Memory

-1.0MiB live, 76.6MiB allocated

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
2.0ms	1.0371979355890709e-70	9.884556088971023e-66
2.0ms	-1.0462031542985186e-306	4.966632215515019e-307
71.0ms	-3.071609159609562e+199	-4.3980944184712664e+196

Samples

40.0ms	124×	0	invalid
21.0ms	128×	0	valid

Compiler

Compiled 1 817 to 1 402 computations (22.8% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch5.0ms (0%)

Memory

14.1MiB live, 14.1MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	-1.0462031542985186e-306	4.966632215515019e-307
2.0ms	-3.071609159609562e+199	-4.3980944184712664e+196

Compiler

Compiled 1 094 to 870 computations (20.5% saved)

bsearch89.0ms (0.5%)

Memory

7.0MiB live, 196.4MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	-1.0462031542985186e-306	4.966632215515019e-307
78.0ms	-1.4626025381921215e+77	-1.0528813120542808e+66

Samples

32.0ms	187×	0	invalid
27.0ms	160×	0	valid

Compiler

Compiled 1 198 to 980 computations (18.2% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch57.0ms (0.3%)

Memory

1.8MiB live, 123.8MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
3.0ms	-1.0462031542985186e-306	4.966632215515019e-307
48.0ms	-2.8896077653355946e+182	-1.2959833610664019e+180

Samples

22.0ms	112×	0	valid
18.0ms	111×	0	invalid

Compiler

Compiled 980 to 787 computations (19.7% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch4.0ms (0%)

Memory

13.3MiB live, 13.3MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	-1.0462031542985186e-306	4.966632215515019e-307
1.0ms	-2.8896077653355946e+182	-1.2959833610664019e+180

Compiler

Compiled 905 to 727 computations (19.7% saved)

bsearch6.0ms (0%)

Memory

-25.4MiB live, 12.8MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
4.0ms	-1.0462031542985186e-306	4.966632215515019e-307
1.0ms	-2.8896077653355946e+182	-1.2959833610664019e+180

Compiler

Compiled 937 to 727 computations (22.4% saved)

bsearch2.0ms (0%)

Memory

7.1MiB live, 7.1MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
2.0ms	-1.0462031542985186e-306	4.966632215515019e-307

Compiler

Compiled 510 to 398 computations (22% saved)

bsearch140.0ms (0.8%)

Memory

31.9MiB live, 270.2MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
76.0ms	3.8848963494914105e+118	2.6931726772000174e+129
51.0ms	-1.583592350290023e-307	7.15226268865501e-308

Samples

55.0ms	284×	0	invalid
52.0ms	272×	0	valid

Compiler

Compiled 828 to 682 computations (17.6% saved)

Precisions

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

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

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

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

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

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

exact: 1.0ms (1.5% of total)

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

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

bsearch9.0ms (0%)

Memory

-21.5MiB live, 12.6MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	3.8848963494914105e+118	2.6931726772000174e+129
2.0ms	-1.583592350290023e-307	7.15226268865501e-308

Compiler

Compiled 794 to 665 computations (16.2% saved)

bsearch106.0ms (0.6%)

Memory

22.8MiB live, 263.5MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
48.0ms	-4.2286916674456115e-242	-5.3440406571431276e-244
49.0ms	-1.1036204940471204e+61	-1.2641660297590206e+59

Samples

46.0ms	224×	0	valid
32.0ms	256×	0	invalid

Compiler

Compiled 689 to 576 computations (16.4% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch62.0ms (0.3%)

Memory

-33.7MiB live, 125.8MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
54.0ms	4.966632215515019e-307	5.793236637160855e-300

Samples

24.0ms	144×	0	valid
20.0ms	126×	0	invalid

Compiler

Compiled 371 to 336 computations (9.4% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch21.0ms (0.1%)

Memory

7.6MiB live, 47.0MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
17.0ms	7.3839381527318294e+112	1.0702849010389718e+113
1.0ms	-1.583592350290023e-307	7.15226268865501e-308

Samples

9.0ms	48×	0	valid
5.0ms	36×	0	invalid

Compiler

Compiled 392 to 364 computations (7.1% saved)

Precisions

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

ival-div: 3.0ms (28.4% of total)

ival-mult: 3.0ms (28.4% of total)

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch96.0ms (0.5%)

Memory

7.9MiB live, 220.9MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
49.0ms	1.5112990063442102e-125	1.5640060547952594e-122
37.0ms	1.5276697927162963e-285	9.195788148425568e-284

Samples

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

Compiler

Compiled 547 to 509 computations (6.9% saved)

Precisions

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

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

bsearch112.0ms (0.6%)

Memory

-12.5MiB live, 107.9MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
106.0ms	3.465500830279188e-274	2.502239732401325e-258

Samples

71.0ms	160×	0	valid
24.0ms	124×	0	invalid

Compiler

Compiled 218 to 270 computations (-23.9% saved)

Precisions

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

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

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

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

ival-sub: 8.0ms (20.6% of total)

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

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

exact: 0.0ms (0% of total)

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

bsearch42.0ms (0.2%)

Memory

23.0MiB live, 62.3MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
38.0ms	3.465500830279188e-274	2.502239732401325e-258

Samples

23.0ms	80×	0	valid
10.0ms	66×	0	invalid

Compiler

Compiled 208 to 260 computations (-25% saved)

Precisions

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

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

ival-mult: 5.0ms (29.9% of total)

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

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

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

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

exact: 0.0ms (0% of total)

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

simplify85.0ms (0.5%)

Memory

-20.1MiB live, 100.9MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	221	1824
1	293	1824
2	332	1824
3	375	1824
4	418	1824
5	458	1824
6	480	1824
7	488	1824
8	490	1824

Stop Event

1×

saturated

Calls

Call 1

Inputs
(if (<=.f64 h #s(literal -102000000000000002923230082887857256260896210505761714049709740517660113588191232 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (neg.f64 d) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 l) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (neg.f64 d) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 l) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (if (<=.f64 h #s(literal 7149021523390683/62165404551223330269422781018352605012557018849668464680057997111644937126566671941632 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (/.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 h))) (sqrt.f64 l)))))
(if (<=.f64 h #s(literal -95000000000000003657643921834719671532012751763591360669825011445322161366939271622450307772953524966324914657495402015111781628481827049170341642123176928714568150342474911629747353916195366502400 binary64)) (.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (if (<=.f64 h #s(literal 7149021523390683/62165404551223330269422781018352605012557018849668464680057997111644937126566671941632 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (/.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 h))) (sqrt.f64 l)))))
(if (<=.f64 h #s(literal -95000000000000003657643921834719671532012751763591360669825011445322161366939271622450307772953524966324914657495402015111781628481827049170341642123176928714568150342474911629747353916195366502400 binary64)) (.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (/.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)) d) (sqrt.f64 l)) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -21500000000000000601616169161698018738438157838456982281929566978048 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) l) h #s(literal 1 binary64))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (/.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)) d) (sqrt.f64 l)) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -190000000000000006364111469391636800465571396785379280504998912981509868379716200323128115249678998448553219208809025658820834125106841540316300816855815036957709089450163691323392000 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (/.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)) d) (sqrt.f64 l)) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -190000000000000006364111469391636800465571396785379280504998912981509868379716200323128115249678998448553219208809025658820834125106841540316300816855815036957709089450163691323392000 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (/.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (*.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)) d) (sqrt.f64 l)) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -190000000000000006364111469391636800465571396785379280504998912981509868379716200323128115249678998448553219208809025658820834125106841540316300816855815036957709089450163691323392000 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (/.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (*.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 h))) (sqrt.f64 l))))
(if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (/.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (*.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 h))) (sqrt.f64 l)))
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (if (<=.f64 l #s(literal 10199999999999999449717086128920053799787857776934358825242899416263428944823858252315497946924716866925914447218007108222976 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 l h)) d)) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (if (<=.f64 l #s(literal 10199999999999999449717086128920053799787857776934358825242899416263428944823858252315497946924716866925914447218007108222976 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal -4999999999999999746935676485370094334818225055067050365419520 binary64)) #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 -4151356505655847/7687697232696013035490465480201479025983241823794691621558168976140934720122093268938148043346259333988919315645138393722043075242293497100043735968399262883880680368733084239192707430286484902215659282347932289182034267181757047930126964620533348010060414976 binary64)) (.f64 #s(approx (+ ( (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)))))
(if (<=.f64 h #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))))) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))))
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #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 l #s(literal 77999999999999993694960091656810265862443303243019348401322186578187284717264485320455425665518964837917543890944 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) h) l) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #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 2076047926423393/1339385758982834151185531311325002263201756014631917009304687985462938813906170153116497973519619822659493341146941433531483931607115392554498072196837321850491820971853028873177634325632796392734744272769130809372947742658424845944895692993259632864321399559710817770957553728956578048354650708508672 binary64)) #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 4837838548911559/744282853678701455922507579277316643178128753343813693728245963960974631028119473486019635930893891134220822124816566203939432067701407744 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal 5264097942609339/18152061871066687778296661354368903321914797383537530017770652579540291225102592450502542901564408576535628952517004065557306948798155587253306037366972590646764780767180906664339433713797579795779287057890032192456881698082005372169886461674177955114893128728688280185836979355648 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 8622229388756677/4538015467766671944574165338592225830478699345884382504442663144885072806275648112625635725391102144133907238129251016389326737199538896813326509341743147661691195191795226666084858428449394948944821764472508048114220424520501343042471615418544488778723282182172070046459244838912 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))

Outputs
(if (<=.f64 h #s(literal -102000000000000002923230082887857256260896210505761714049709740517660113588191232 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (.f64 (/.f64 (pow.f64 (neg.f64 d) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 l) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (neg.f64 d) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 l) #s(literal 1/4 binary64))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (if (<=.f64 h #s(literal 7149021523390683/62165404551223330269422781018352605012557018849668464680057997111644937126566671941632 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (/.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 h))) (sqrt.f64 l)))))
(if (<=.f64 h #s(literal -102000000000000002923230082887857256260896210505761714049709740517660113588191232 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 h #s(literal -1 binary64))) (/.f64 (.f64 D (.f64 M (/.f64 #s(literal 1/2 binary64) d))) l))) (.f64 (.f64 (/.f64 (pow.f64 (neg.f64 d) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 l) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (neg.f64 d) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 l) #s(literal 1/4 binary64)))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 h #s(literal -1 binary64))) (/.f64 (.f64 D (.f64 M (/.f64 #s(literal 1/2 binary64) d))) l)))) (if (<=.f64 h #s(literal 7149021523390683/62165404551223330269422781018352605012557018849668464680057997111644937126566671941632 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 h #s(literal -1 binary64))) (/.f64 (.f64 D (.f64 M (/.f64 #s(literal 1/2 binary64) d))) l)))) (/.f64 (.f64 (/.f64 d (sqrt.f64 h)) (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64))) (sqrt.f64 l)))))
(if (<=.f64 h #s(literal -95000000000000003657643921834719671532012751763591360669825011445322161366939271622450307772953524966324914657495402015111781628481827049170341642123176928714568150342474911629747353916195366502400 binary64)) (.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (if (<=.f64 h #s(literal 7149021523390683/62165404551223330269422781018352605012557018849668464680057997111644937126566671941632 binary64)) (.f64 (.f64 (/.f64 (sqrt.f64 d) (sqrt.f64 h)) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (/.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 h))) (sqrt.f64 l)))))
(if (<=.f64 h #s(literal -95000000000000003657643921834719671532012751763591360669825011445322161366939271622450307772953524966324914657495402015111781628481827049170341642123176928714568150342474911629747353916195366502400 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (sqrt.f64 (neg.f64 d))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 h #s(literal -1 binary64))) (/.f64 (.f64 D (.f64 M (/.f64 #s(literal 1/2 binary64) d))) l)))) (if (<=.f64 h #s(literal 7149021523390683/62165404551223330269422781018352605012557018849668464680057997111644937126566671941632 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 d) (sqrt.f64 h))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 h #s(literal -1 binary64))) (/.f64 (.f64 D (.f64 M (/.f64 #s(literal 1/2 binary64) d))) l)))) (/.f64 (.f64 (/.f64 d (sqrt.f64 h)) (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64))) (sqrt.f64 l)))))
(if (<=.f64 h #s(literal -95000000000000003657643921834719671532012751763591360669825011445322161366939271622450307772953524966324914657495402015111781628481827049170341642123176928714568150342474911629747353916195366502400 binary64)) (.f64 (.f64 (.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (/.f64 #s(literal -1 binary64) h))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (pow.f64 (/.f64 (.f64 M D) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64))) (/.f64 h l)))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (/.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)) d) (sqrt.f64 l)) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -95000000000000003657643921834719671532012751763591360669825011445322161366939271622450307772953524966324914657495402015111781628481827049170341642123176928714568150342474911629747353916195366502400 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (/.f64 (.f64 D M) (.f64 #s(literal 2 binary64) d)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) h)) (sqrt.f64 (neg.f64 d))) (pow.f64 (/.f64 d l) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 h #s(literal -1 binary64))) (/.f64 (.f64 D (.f64 M (/.f64 #s(literal 1/2 binary64) d))) l)))) (/.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (/.f64 h l)) #s(literal 1 binary64)) d) (sqrt.f64 l)) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -21500000000000000601616169161698018738438157838456982281929566978048 binary64)) (.f64 (.f64 (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l)))) (fma.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 #s(literal 1/4 binary64) (pow.f64 (.f64 D (/.f64 M d)) #s(literal 2 binary64)))) l) h #s(literal 1 binary64))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (/.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)) d) (sqrt.f64 l)) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -21500000000000000601616169161698018738438157838456982281929566978048 binary64)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)) l) h #s(literal 1 binary64)) (.f64 (/.f64 (sqrt.f64 (neg.f64 d)) (sqrt.f64 (neg.f64 l))) (pow.f64 (/.f64 d h) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 h #s(literal -1 binary64))) (/.f64 (.f64 D (.f64 M (/.f64 #s(literal 1/2 binary64) d))) l)))) (/.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (/.f64 h l)) #s(literal 1 binary64)) d) (sqrt.f64 l)) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -190000000000000006364111469391636800465571396785379280504998912981509868379716200323128115249678998448553219208809025658820834125106841540316300816855815036957709089450163691323392000 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (.f64 (/.f64 #s(literal 1/2 binary64) d) M) D) l) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 D #s(literal 1/2 binary64))) (/.f64 M d)) (pow.f64 h #s(literal -1 binary64)))))) (/.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)) d) (sqrt.f64 l)) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -190000000000000006364111469391636800465571396785379280504998912981509868379716200323128115249678998448553219208809025658820834125106841540316300816855815036957709089450163691323392000 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (/.f64 M d) (.f64 (.f64 D #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 h #s(literal -1 binary64))) (/.f64 (.f64 D (.f64 M (/.f64 #s(literal 1/2 binary64) d))) l)))) (/.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (/.f64 h l)) #s(literal 1 binary64)) d) (sqrt.f64 l)) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -190000000000000006364111469391636800465571396785379280504998912981509868379716200323128115249678998448553219208809025658820834125106841540316300816855815036957709089450163691323392000 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (/.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 h l) (.f64 (pow.f64 (*.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)) d) (sqrt.f64 l)) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -190000000000000006364111469391636800465571396785379280504998912981509868379716200323128115249678998448553219208809025658820834125106841540316300816855815036957709089450163691323392000 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) D) (/.f64 M d)) l) (.f64 (.f64 D #s(literal 1/4 binary64)) (.f64 (/.f64 M d) h)) #s(literal 1 binary64)) #s(approx ( (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d)))) (/.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (pow.f64 (.f64 (/.f64 M d) D) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (/.f64 h l)) #s(literal 1 binary64)) d) (sqrt.f64 l)) (sqrt.f64 h))))
(if (<=.f64 h #s(literal -190000000000000006364111469391636800465571396785379280504998912981509868379716200323128115249678998448553219208809025658820834125106841540316300816855815036957709089450163691323392000 binary64)) (.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (sqrt.f64 (/.f64 d h))) (sqrt.f64 (/.f64 d l))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (/.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (*.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 h))) (sqrt.f64 l))))
(if (<=.f64 h #s(literal -190000000000000006364111469391636800465571396785379280504998912981509868379716200323128115249678998448553219208809025658820834125106841540316300816855815036957709089450163691323392000 binary64)) (.f64 (sqrt.f64 (/.f64 d l)) (.f64 (sqrt.f64 (/.f64 d h)) (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)))) (if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) D) (/.f64 M d)) l) (.f64 (.f64 D #s(literal 1/4 binary64)) (.f64 (/.f64 M d) h)) #s(literal 1 binary64)) #s(approx ( (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d)))) (/.f64 (.f64 (/.f64 d (sqrt.f64 h)) (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64))) (sqrt.f64 l))))
(if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (/.f64 (.f64 (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (*.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64)) (/.f64 d (sqrt.f64 h))) (sqrt.f64 l)))
(if (<=.f64 h #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) D) (/.f64 M d)) l) (.f64 (.f64 D #s(literal 1/4 binary64)) (.f64 (/.f64 M d) h)) #s(literal 1 binary64)) #s(approx (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d)))) (/.f64 (.f64 (/.f64 d (sqrt.f64 h)) (fma.f64 (.f64 (.f64 (.f64 (.f64 (/.f64 M d) h) D) #s(literal 1/4 binary64)) (/.f64 M d)) (/.f64 (.f64 #s(literal -1/2 binary64) D) l) #s(literal 1 binary64))) (sqrt.f64 l)))
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (if (<=.f64 l #s(literal 10199999999999999449717086128920053799787857776934358825242899416263428944823858252315497946924716866925914447218007108222976 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 l h)) d)) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) D) (/.f64 M d)) l) (.f64 (.f64 D #s(literal 1/4 binary64)) (.f64 (/.f64 M d) h)) #s(literal 1 binary64)) #s(approx (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d)))) (if (<=.f64 l #s(literal 10199999999999999449717086128920053799787857776934358825242899416263428944823858252315497946924716866925914447218007108222976 binary64)) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (.f64 l h)) d)) (fma.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) D) (/.f64 M d)) l) (.f64 (.f64 D #s(literal 1/4 binary64)) (.f64 (/.f64 M 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 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 #s(approx ( (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) (if (<=.f64 l #s(literal 10199999999999999449717086128920053799787857776934358825242899416263428944823858252315497946924716866925914447218007108222976 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (.f64 (fma.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) D) (/.f64 M d)) l) (.f64 (.f64 D #s(literal 1/4 binary64)) (.f64 (/.f64 M d) h)) #s(literal 1 binary64)) #s(approx (* (sqrt (/ d h)) (/ (sqrt d) (sqrt l))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d)))) (if (<=.f64 l #s(literal 10199999999999999449717086128920053799787857776934358825242899416263428944823858252315497946924716866925914447218007108222976 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) D) (/.f64 M d)) l) (.f64 (.f64 D #s(literal 1/4 binary64)) (.f64 (/.f64 M 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 -4999999999999999746935676485370094334818225055067050365419520 binary64)) #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 -4151356505655847/7687697232696013035490465480201479025983241823794691621558168976140934720122093268938148043346259333988919315645138393722043075242293497100043735968399262883880680368733084239192707430286484902215659282347932289182034267181757047930126964620533348010060414976 binary64)) (.f64 #s(approx (+ ( (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (fma.f64 (.f64 (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h) #s(literal -1/8 binary64)) (/.f64 (.f64 D D) l) #s(literal 1 binary64))) (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d))) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64)))))
(if (<=.f64 d #s(literal -4999999999999999746935676485370094334818225055067050365419520 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) (if (<=.f64 d #s(literal -4151356505655847/7687697232696013035490465480201479025983241823794691621558168976140934720122093268938148043346259333988919315645138393722043075242293497100043735968399262883880680368733084239192707430286484902215659282347932289182034267181757047930126964620533348010060414976 binary64)) (.f64 (sqrt.f64 (.f64 (/.f64 (/.f64 d h) l) d)) #s(approx (+ (* (* (/ h l) (* 1/4 (pow (* D (/ M d)) 2))) -1/2) 1) (fma.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l) #s(literal 1 binary64)))) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) D) (/.f64 M d)) l) (.f64 (.f64 D #s(literal 1/4 binary64)) (*.f64 (/.f64 M d) h)) #s(literal 1 binary64)))))
(if (<=.f64 h #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))))) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (/.f64 M d) (.f64 #s(literal -1/2 binary64) D)) l) (.f64 (.f64 (/.f64 M d) h) (*.f64 #s(literal 1/4 binary64) D)) #s(literal 1 binary64))))
(if (<=.f64 h #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 l h))) (neg.f64 d))) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) (fma.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) D) (/.f64 M d)) l) (.f64 (.f64 D #s(literal 1/4 binary64)) (*.f64 (/.f64 M d) h)) #s(literal 1 binary64))))
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #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 l #s(literal 77999999999999993694960091656810265862443303243019348401322186578187284717264485320455425665518964837917543890944 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (fma.f64 (.f64 (/.f64 (.f64 #s(literal -1/8 binary64) h) l) (/.f64 (/.f64 (.f64 D D) d) d)) (.f64 M M) #s(literal 1 binary64)))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) (if (<=.f64 l #s(literal 77999999999999993694960091656810265862443303243019348401322186578187284717264485320455425665518964837917543890944 binary64)) (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (fma.f64 (.f64 (/.f64 (/.f64 (.f64 D D) d) d) (/.f64 (.f64 #s(literal -1/8 binary64) h) l)) (.f64 M M) #s(literal 1 binary64))) (/.f64 d (sqrt.f64 (.f64 l h)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal 2076047926423393/1339385758982834151185531311325002263201756014631917009304687985462938813906170153116497973519619822659493341146941433531483931607115392554498072196837321850491820971853028873177634325632796392734744272769130809372947742658424845944895692993259632864321399559710817770957553728956578048354650708508672 binary64)) #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 4837838548911559/744282853678701455922507579277316643178128753343813693728245963960974631028119473486019635930893891134220822124816566203939432067701407744 binary64)) (.f64 (/.f64 d (sqrt.f64 (.f64 l h))) #s(approx (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) l)))) #s(approx ( (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 d #s(literal 2076047926423393/1339385758982834151185531311325002263201756014631917009304687985462938813906170153116497973519619822659493341146941433531483931607115392554498072196837321850491820971853028873177634325632796392734744272769130809372947742658424845944895692993259632864321399559710817770957553728956578048354650708508672 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) (if (<=.f64 d #s(literal 4837838548911559/744282853678701455922507579277316643178128753343813693728245963960974631028119473486019635930893891134220822124816566203939432067701407744 binary64)) (.f64 #s(approx (- 1 ( (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (/.f64 (.f64 M M) d) d) h)) (/.f64 (.f64 D D) 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 (*.f64 (sqrt.f64 l) (sqrt.f64 h))))))
(if (<=.f64 l #s(literal 5264097942609339/18152061871066687778296661354368903321914797383537530017770652579540291225102592450502542901564408576535628952517004065557306948798155587253306037366972590646764780767180906664339433713797579795779287057890032192456881698082005372169886461674177955114893128728688280185836979355648 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 5264097942609339/18152061871066687778296661354368903321914797383537530017770652579540291225102592450502542901564408576535628952517004065557306948798155587253306037366972590646764780767180906664339433713797579795779287057890032192456881698082005372169886461674177955114893128728688280185836979355648 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (*.f64 (sqrt.f64 l) (sqrt.f64 h)))))
(if (<=.f64 l #s(literal 8622229388756677/4538015467766671944574165338592225830478699345884382504442663144885072806275648112625635725391102144133907238129251016389326737199538896813326509341743147661691195191795226666084858428449394948944821764472508048114220424520501343042471615418544488778723282182172070046459244838912 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (neg.f64 d) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))))
(if (<=.f64 l #s(literal 8622229388756677/4538015467766671944574165338592225830478699345884382504442663144885072806275648112625635725391102144133907238129251016389326737199538896813326509341743147661691195191795226666084858428449394948944821764472508048114220424520501343042471615418544488778723282182172070046459244838912 binary64)) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 l h))) (neg.f64 d))) #s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h)))))
#s(approx (* (* (pow (/ d h) (/ 1 2)) (pow (/ d l) (/ 1 2))) (- 1 (* (* (/ 1 2) (pow (/ (* M D) (* 2 d)) 2)) (/ h l)))) (/.f64 d (sqrt.f64 (*.f64 l h))))

soundness1.8s (10.2%)

Memory

34.5MiB live, 1 740.4MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	59	220
0	101	202
1	275	190
2	1545	190
0	8642	185
0	232	15058
1	672	14800
2	2404	14673
3	5440	14631
0	8155	14292
0	178	8803
1	496	8551
2	1687	8455
3	4038	8416
0	8351	8209
0	20	50
0	34	48
1	114	48
2	719	48
3	7801	48
0	8835	47
0	252	16896
1	709	16449
2	2500	16357
3	6117	16315
0	8516	15922
0	73	314
0	123	298
1	369	294
2	2641	286
0	8371	280
0	78	350
0	132	326
1	391	306
2	2742	287
0	8282	278
0	62	2502
1	172	2470
2	621	2470
3	3321	2470
4	5958	2470
5	7982	2470
0	8092	2425

Stop Event

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

Compiler

Compiled 7 150 to 2 874 computations (59.8% saved)

preprocess139.0ms (0.8%)

Memory: -3.8MiB live, 305.4MiB allocated
Compiler: Compiled 3 660 to 826 computations (77.4% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

start0.0ms (0%)

analyze448.0ms (2.5%)

sample6.1s (33.9%)

explain348.0ms (2%)

preprocess179.0ms (1%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify104.0ms (0.6%)

localize101.0ms (0.6%)

series57.0ms (0.3%)

simplify162.0ms (0.9%)

rewrite168.0ms (0.9%)

eval116.0ms (0.6%)

prune48.0ms (0.3%)

simplify187.0ms (1%)

localize253.0ms (1.4%)

series162.0ms (0.9%)

simplify142.0ms (0.8%)

rewrite268.0ms (1.5%)

eval431.0ms (2.4%)

prune168.0ms (0.9%)

simplify125.0ms (0.7%)

localize277.0ms (1.5%)

series152.0ms (0.9%)

simplify410.0ms (2.3%)

rewrite209.0ms (1.2%)

eval375.0ms (2.1%)

prune234.0ms (1.3%)

simplify119.0ms (0.7%)

localize231.0ms (1.3%)

series138.0ms (0.8%)

simplify189.0ms (1.1%)

rewrite305.0ms (1.7%)

eval457.0ms (2.6%)

prune412.0ms (2.3%)

regimes354.0ms (2%)

regimes111.0ms (0.6%)

regimes155.0ms (0.9%)

regimes49.0ms (0.3%)

regimes106.0ms (0.6%)

regimes89.0ms (0.5%)

regimes64.0ms (0.4%)

regimes67.0ms (0.4%)

regimes73.0ms (0.4%)

regimes15.0ms (0.1%)

regimes146.0ms (0.8%)

regimes26.0ms (0.1%)

regimes101.0ms (0.6%)

regimes55.0ms (0.3%)

regimes138.0ms (0.8%)

regimes15.0ms (0.1%)

regimes41.0ms (0.2%)

bsearch312.0ms (1.7%)

bsearch97.0ms (0.5%)

bsearch5.0ms (0%)

bsearch89.0ms (0.5%)

bsearch57.0ms (0.3%)

bsearch4.0ms (0%)

bsearch6.0ms (0%)

bsearch2.0ms (0%)

bsearch140.0ms (0.8%)

bsearch9.0ms (0%)

bsearch106.0ms (0.6%)

bsearch62.0ms (0.3%)

bsearch21.0ms (0.1%)

bsearch96.0ms (0.5%)

bsearch112.0ms (0.6%)

bsearch42.0ms (0.2%)

simplify85.0ms (0.5%)

soundness1.8s (10.2%)

preprocess139.0ms (0.8%)

end0.0ms (0%)

Profiling